|
500
|
How can I filter items for dates before a specified date
OBJECT column,items,tree;
tree = ObjectByName("AN1") ;
_ObjectCallMethod( tree , "BeginUpdate");
column = _ObjectCallMethod( _ObjectGetProperty( tree , "Columns") , "Add", "Dates");
_ObjectSetProperty( column , "SortType", 2);
_ObjectSetProperty( column , "DisplayFilterButton", -1);
_ObjectSetProperty( column , "DisplayFilterPattern", -1);
_ObjectSetProperty( column , "DisplayFilterDate", -1);
_ObjectSetProperty( column , "FilterList", 1026);
_ObjectSetProperty( column , "Filter", "to 12/27/2010");
_ObjectSetProperty( column , "FilterType", 4);
items = _ObjectGetProperty( tree , "Items");
_ObjectCallMethod( items , "AddItem", "12/27/2010");
_ObjectCallMethod( items , "AddItem", "12/28/2010");
_ObjectCallMethod( items , "AddItem", "12/29/2010");
_ObjectCallMethod( items , "AddItem", "12/30/2010");
_ObjectCallMethod( items , "AddItem", "12/31/2010");
_ObjectCallMethod( tree , "ApplyFilter");
_ObjectCallMethod( tree , "EndUpdate");
|
|
499
|
Is it possible to filter dates
OBJECT column,items,tree;
tree = ObjectByName("AN1") ;
_ObjectCallMethod( tree , "BeginUpdate");
column = _ObjectCallMethod( _ObjectGetProperty( tree , "Columns") , "Add", "Dates");
_ObjectSetProperty( column , "SortType", 2);
_ObjectSetProperty( column , "DisplayFilterButton", -1);
_ObjectSetProperty( column , "DisplayFilterPattern", -1);
_ObjectSetProperty( column , "DisplayFilterDate", -1);
_ObjectSetProperty( column , "FilterList", 1026);
items = _ObjectGetProperty( tree , "Items");
_ObjectCallMethod( items , "AddItem", "12/27/2010");
_ObjectCallMethod( items , "AddItem", "12/28/2010");
_ObjectCallMethod( items , "AddItem", "12/29/2010");
_ObjectCallMethod( items , "AddItem", "12/30/2010");
_ObjectCallMethod( items , "AddItem", "12/31/2010");
_ObjectCallMethod( tree , "EndUpdate");
|
|
498
|
Is it possible to change the Exclude field name to something different, in the drop down filter window
OBJECT column,items,tree;
tree = ObjectByName("AN1") ;
_ObjectCallMethod( tree , "BeginUpdate");
_ObjectSetProperty( tree , "LinesAtRoot", -1);
_ObjectCallMethod(tree, "ExecuteTemplate", "Description(25) = `Leaving out`");
column = _ObjectCallMethod( _ObjectGetProperty( tree , "Columns") , "Add", "Items");
_ObjectSetProperty( column , "DisplayFilterButton", -1);
_ObjectSetProperty( column , "DisplayFilterPattern", 0);
_ObjectSetProperty( column , "FilterList", 9472);
items = _ObjectGetProperty( tree , "Items");
h = _ObjectCallMethod( items , "AddItem", "Root 1");
_ObjectCallMethod( items , "InsertItem", h,"","Child 1");
_ObjectCallMethod( items , "InsertItem", h,"","Child 2");
_ObjectCallMethod(tree, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(tree, "TemplatePut", items)
_ObjectCallMethod(tree, "TemplatePut", h)
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.ExpandItem(h) = True");
h = _ObjectCallMethod( items , "AddItem", "Root 2");
_ObjectCallMethod( items , "InsertItem", h,"","Child 1");
_ObjectCallMethod( tree , "EndUpdate");
|
|
497
|
How can I display the Exclude field in the drop down filter window
OBJECT column,items,tree;
tree = ObjectByName("AN1") ;
_ObjectCallMethod( tree , "BeginUpdate");
_ObjectSetProperty( tree , "LinesAtRoot", -1);
column = _ObjectCallMethod( _ObjectGetProperty( tree , "Columns") , "Add", "Items");
_ObjectSetProperty( column , "DisplayFilterButton", -1);
_ObjectSetProperty( column , "DisplayFilterPattern", 0);
_ObjectSetProperty( column , "FilterList", 9472);
items = _ObjectGetProperty( tree , "Items");
h = _ObjectCallMethod( items , "AddItem", "Root 1");
_ObjectCallMethod( items , "InsertItem", h,"","Child 1");
_ObjectCallMethod( items , "InsertItem", h,"","Child 2");
_ObjectCallMethod(tree, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(tree, "TemplatePut", items)
_ObjectCallMethod(tree, "TemplatePut", h)
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.ExpandItem(h) = True");
h = _ObjectCallMethod( items , "AddItem", "Root 2");
_ObjectCallMethod( items , "InsertItem", h,"","Child 1");
_ObjectCallMethod( tree , "EndUpdate");
|
|
496
|
Is it possible to show and ensure the focused item from the control, in the drop down filter window
OBJECT column,items,tree;
tree = ObjectByName("AN1") ;
_ObjectCallMethod( tree , "BeginUpdate");
_ObjectSetProperty( tree , "LinesAtRoot", -1);
column = _ObjectCallMethod( _ObjectGetProperty( tree , "Columns") , "Add", "Items");
_ObjectSetProperty( column , "DisplayFilterButton", -1);
_ObjectSetProperty( column , "DisplayFilterPattern", 0);
_ObjectSetProperty( column , "FilterList", 1280);
items = _ObjectGetProperty( tree , "Items");
h = _ObjectCallMethod( items , "AddItem", "Root 1");
_ObjectCallMethod( items , "InsertItem", h,"","Child 1");
_ObjectCallMethod( items , "InsertItem", h,"","Child 2");
_ObjectCallMethod(tree, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(tree, "TemplatePut", items)
_ObjectCallMethod(tree, "TemplatePut", h)
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.ExpandItem(h) = True");
h = _ObjectCallMethod( items , "AddItem", "Root 2");
_ObjectCallMethod( items , "InsertItem", h,"","Child 1");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.SelectItem(InsertItem(h,,`Child 2`)) = True");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.ExpandItem(h) = True");
_ObjectCallMethod( tree , "EndUpdate");
|
|
495
|
Is it possible to show only blanks items with no listed items from the control
OBJECT column,items,tree;
tree = ObjectByName("AN1") ;
_ObjectCallMethod( tree , "BeginUpdate");
_ObjectSetProperty( tree , "LinesAtRoot", -1);
column = _ObjectCallMethod( _ObjectGetProperty( tree , "Columns") , "Add", "Items");
_ObjectSetProperty( column , "DisplayFilterButton", -1);
_ObjectSetProperty( column , "DisplayFilterPattern", 0);
_ObjectSetProperty( column , "FilterList", 16386);
items = _ObjectGetProperty( tree , "Items");
h = _ObjectCallMethod( items , "AddItem", "Root 1");
_ObjectCallMethod( items , "InsertItem", h,"","Child 1");
_ObjectCallMethod( items , "InsertItem", h,"","Child 2");
_ObjectCallMethod(tree, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(tree, "TemplatePut", items)
_ObjectCallMethod(tree, "TemplatePut", h)
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.ExpandItem(h) = True");
h = _ObjectCallMethod( items , "AddItem", "Root 2");
_ObjectCallMethod( items , "InsertItem", h,"","Child 1");
_ObjectCallMethod( items , "InsertItem", h,"","Child 2");
_ObjectCallMethod( tree , "EndUpdate");
|
|
494
|
How can I include the blanks items in the drop down filter window
OBJECT column,items,tree;
tree = ObjectByName("AN1") ;
_ObjectCallMethod( tree , "BeginUpdate");
_ObjectSetProperty( tree , "LinesAtRoot", -1);
column = _ObjectCallMethod( _ObjectGetProperty( tree , "Columns") , "Add", "Items");
_ObjectSetProperty( column , "DisplayFilterButton", -1);
_ObjectSetProperty( column , "DisplayFilterPattern", 0);
_ObjectSetProperty( column , "FilterList", 16640);
items = _ObjectGetProperty( tree , "Items");
h = _ObjectCallMethod( items , "AddItem", "Root 1");
_ObjectCallMethod( items , "InsertItem", h,"","Child 1");
_ObjectCallMethod( items , "InsertItem", h,"","Child 2");
_ObjectCallMethod(tree, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(tree, "TemplatePut", items)
_ObjectCallMethod(tree, "TemplatePut", h)
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.ExpandItem(h) = True");
h = _ObjectCallMethod( items , "AddItem", "Root 2");
_ObjectCallMethod( items , "InsertItem", h,"","Child 1");
_ObjectCallMethod( items , "InsertItem", h,"","Child 2");
_ObjectCallMethod( tree , "EndUpdate");
|
|
493
|
How can I select multiple items in the drop down filter window, using check-boxes
OBJECT column,items,tree;
tree = ObjectByName("AN1") ;
_ObjectCallMethod( tree , "BeginUpdate");
_ObjectSetProperty( tree , "LinesAtRoot", -1);
column = _ObjectCallMethod( _ObjectGetProperty( tree , "Columns") , "Add", "Items");
_ObjectSetProperty( column , "DisplayFilterButton", -1);
_ObjectSetProperty( column , "DisplayFilterPattern", 0);
_ObjectSetProperty( column , "FilterList", 256);
items = _ObjectGetProperty( tree , "Items");
h = _ObjectCallMethod( items , "AddItem", "Root 1");
_ObjectCallMethod( items , "InsertItem", h,"","Child 1");
_ObjectCallMethod( items , "InsertItem", h,"","Child 2");
_ObjectCallMethod(tree, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(tree, "TemplatePut", items)
_ObjectCallMethod(tree, "TemplatePut", h)
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.ExpandItem(h) = True");
h = _ObjectCallMethod( items , "AddItem", "Root 2");
_ObjectCallMethod( items , "InsertItem", h,"","Child 1");
_ObjectCallMethod( items , "InsertItem", h,"","Child 2");
_ObjectCallMethod( tree , "EndUpdate");
|
|
492
|
Is it possible to allow a single item being selected in the drop down filter window
OBJECT column,items,tree;
tree = ObjectByName("AN1") ;
_ObjectCallMethod( tree , "BeginUpdate");
_ObjectSetProperty( tree , "LinesAtRoot", -1);
column = _ObjectCallMethod( _ObjectGetProperty( tree , "Columns") , "Add", "Items");
_ObjectSetProperty( column , "DisplayFilterButton", -1);
_ObjectSetProperty( column , "DisplayFilterPattern", 0);
_ObjectSetProperty( column , "FilterList", 128);
items = _ObjectGetProperty( tree , "Items");
h = _ObjectCallMethod( items , "AddItem", "Root 1");
_ObjectCallMethod( items , "InsertItem", h,"","Child 1");
_ObjectCallMethod( items , "InsertItem", h,"","Child 2");
_ObjectCallMethod(tree, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(tree, "TemplatePut", items)
_ObjectCallMethod(tree, "TemplatePut", h)
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.ExpandItem(h) = True");
h = _ObjectCallMethod( items , "AddItem", "Root 2");
_ObjectCallMethod( items , "InsertItem", h,"","Child 1");
_ObjectCallMethod( items , "InsertItem", h,"","Child 2");
_ObjectCallMethod( tree , "EndUpdate");
|
|
491
|
How can I display no (All) item in the drop down filter window
OBJECT column,items,tree;
tree = ObjectByName("AN1") ;
_ObjectCallMethod( tree , "BeginUpdate");
_ObjectSetProperty( tree , "LinesAtRoot", -1);
_ObjectCallMethod(tree, "ExecuteTemplate", "Description(0) = ``");
column = _ObjectCallMethod( _ObjectGetProperty( tree , "Columns") , "Add", "Items");
_ObjectSetProperty( column , "DisplayFilterButton", -1);
_ObjectSetProperty( column , "DisplayFilterPattern", -1);
_ObjectSetProperty( column , "FilterList", 2);
items = _ObjectGetProperty( tree , "Items");
h = _ObjectCallMethod( items , "AddItem", "Root 1");
_ObjectCallMethod( items , "InsertItem", h,"","Child 1");
_ObjectCallMethod( items , "InsertItem", h,"","Child 2");
_ObjectCallMethod(tree, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(tree, "TemplatePut", items)
_ObjectCallMethod(tree, "TemplatePut", h)
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.ExpandItem(h) = True");
h = _ObjectCallMethod( items , "AddItem", "Root 2");
_ObjectCallMethod( items , "InsertItem", h,"","Child 1");
_ObjectCallMethod( items , "InsertItem", h,"","Child 2");
_ObjectCallMethod( tree , "EndUpdate");
|
|
490
|
Is it possible to display no items in the drop down filter window, so only the pattern is visible
OBJECT column,items,tree;
tree = ObjectByName("AN1") ;
_ObjectCallMethod( tree , "BeginUpdate");
_ObjectSetProperty( tree , "LinesAtRoot", -1);
column = _ObjectCallMethod( _ObjectGetProperty( tree , "Columns") , "Add", "Items");
_ObjectSetProperty( column , "DisplayFilterButton", -1);
_ObjectSetProperty( column , "DisplayFilterPattern", -1);
_ObjectSetProperty( column , "FilterList", 2);
items = _ObjectGetProperty( tree , "Items");
h = _ObjectCallMethod( items , "AddItem", "Root 1");
_ObjectCallMethod( items , "InsertItem", h,"","Child 1");
_ObjectCallMethod( items , "InsertItem", h,"","Child 2");
_ObjectCallMethod(tree, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(tree, "TemplatePut", items)
_ObjectCallMethod(tree, "TemplatePut", h)
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.ExpandItem(h) = True");
h = _ObjectCallMethod( items , "AddItem", "Root 2");
_ObjectCallMethod( items , "InsertItem", h,"","Child 1");
_ObjectCallMethod( items , "InsertItem", h,"","Child 2");
_ObjectCallMethod( tree , "EndUpdate");
|
|
489
|
How do I hide the selection
OBJECT column,columns,items,tree;
tree = ObjectByName("AN1") ;
_ObjectCallMethod( tree , "BeginUpdate");
_ObjectSetProperty( tree , "MarkSearchColumn", 0);
_ObjectSetProperty( tree , "SelForeColor", _ObjectGetProperty( tree , "ForeColor"));
_ObjectSetProperty( tree , "SelBackColor", _ObjectGetProperty( tree , "BackColor"));
_ObjectSetProperty( tree , "ShowFocusRect", 0);
columns = _ObjectGetProperty( tree , "Columns");
column = _ObjectCallMethod( columns , "Add", "Format");
_ObjectSetProperty( column , "FormatColumn", "type(value) in (0,1) ? 'null' : ( dbl(value)<0 ? '<fgcolor=FF0000>'+ (value format '2|.|3|,|1' ) : (dbl(value)>0 ? '<fgcolor=00" +
"00FF>+'+(value format '2|.|3|,' ): '0.00') )");
_ObjectCallMethod(tree, "TemplatePut", "Dim colObj")
_ObjectCallMethod(tree, "TemplatePut", column)
_ObjectCallMethod(tree, "ExecuteTemplate", "colObj.Def(17) = 1");
items = _ObjectGetProperty( tree , "Items");
_ObjectCallMethod( items , "AddItem", 10);
_ObjectCallMethod( items , "AddItem", -8);
_ObjectCallMethod( tree , "EndUpdate");
|
|
488
|
How do I access the cells, or how do I get the values in the columns
OBJECT columns,items,tree;
tree = ObjectByName("AN1") ;
columns = _ObjectGetProperty( tree , "Columns");
_ObjectCallMethod( columns , "Add", "C1");
_ObjectCallMethod( columns , "Add", "C2");
_ObjectCallMethod( columns , "Add", "C3");
items = _ObjectGetProperty( tree , "Items");
h = _ObjectCallMethod( items , "AddItem", "Item 1");
_ObjectCallMethod(tree, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(tree, "TemplatePut", items)
_ObjectCallMethod(tree, "TemplatePut", h)
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h,1) = `SubItem 1.1`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h,2) = `SubItem 1.2`");
Message( _ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h,0)") );
|
|
487
|
Is it possible to load child items when clicking the +/- button
// BeforeExpandItem event - Fired before an item is about to be expanded (collapsed).
FUNCTION treeEvents_BeforeExpandItem(OBJECT tree, INT Item, VARIANT Cancel)
OBJECT items;
items = _ObjectGetProperty( tree , "Items");
_ObjectCallMethod( items , "InsertItem", Item,"","new");
_ObjectCallMethod(tree, "TemplatePut", "Dim iteObj,Item")
_ObjectCallMethod(tree, "TemplatePut", items)
_ObjectCallMethod(tree, "TemplatePut", Item)
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.ItemHasChildren(InsertItem(Item,,`new`)) = True");
_ObjectCallMethod( items , "InsertItem", Item,"","new");
END
OBJECT items,tree;
tree = ObjectByName("AN1") ;
ObjectAssociateEvents("treeEvents", tree);
_ObjectSetProperty( tree , "LinesAtRoot", -1);
_ObjectCallMethod( _ObjectGetProperty( tree , "Columns") , "Add", "Default");
items = _ObjectGetProperty( tree , "Items");
_ObjectCallMethod(tree, "TemplatePut", "Dim iteObj")
_ObjectCallMethod(tree, "TemplatePut", items)
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.ItemHasChildren(AddItem(`aka`)) = True");
_ObjectCallMethod( items , "AddItem", "next item");
|
|
486
|
How can I change the check-boxes appearance
OBJECT appearance,column,items,tree;
tree = ObjectByName("AN1") ;
_ObjectSetProperty( tree , "LinesAtRoot", -1);
column = _ObjectCallMethod( _ObjectGetProperty( tree , "Columns") , "Add", "Default");
_ObjectCallMethod(tree, "TemplatePut", "Dim colObj")
_ObjectCallMethod(tree, "TemplatePut", column)
_ObjectCallMethod(tree, "ExecuteTemplate", "colObj.Def(0) = True");
_ObjectSetProperty( column , "PartialCheck", -1);
items = _ObjectGetProperty( tree , "Items");
h = _ObjectCallMethod( items , "AddItem", "Root");
_ObjectCallMethod( items , "InsertItem", h,"","Child 1");
_ObjectCallMethod( items , "InsertItem", h,"","Child 2");
_ObjectCallMethod(tree, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(tree, "TemplatePut", items)
_ObjectCallMethod(tree, "TemplatePut", h)
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.ExpandItem(h) = True");
appearance = _ObjectGetProperty( tree , "VisualAppearance");
_ObjectCallMethod( appearance , "Add", 1,"XP:Button 3 12");
_ObjectCallMethod( appearance , "Add", 2,"XP:Button 3 11");
_ObjectCallMethod( appearance , "Add", 3,"XP:Button 3 10");
_ObjectCallMethod(tree, "ExecuteTemplate", "CheckImage(0) = 16777216");
_ObjectCallMethod(tree, "ExecuteTemplate", "CheckImage(1) = 33554432");
_ObjectCallMethod(tree, "ExecuteTemplate", "CheckImage(2) = 50331648");
|
|
485
|
How can I initiate the OLE Drag and Drop support
// OLEStartDrag event - Occurs when the OLEDrag method is called.
FUNCTION treeEvents_OLEStartDrag(OBJECT tree, OBJECT Data, INT AllowedEffects)
' Data.SetData("data to drag")
AllowedEffects = 1;
END
OBJECT items,tree;
tree = ObjectByName("AN1") ;
ObjectAssociateEvents("treeEvents", tree);
_ObjectSetProperty( tree , "OLEDropMode", 1);
_ObjectSetProperty( tree , "LinesAtRoot", -1);
_ObjectCallMethod( _ObjectGetProperty( tree , "Columns") , "Add", "Default");
items = _ObjectGetProperty( tree , "Items");
h = _ObjectCallMethod( items , "AddItem", "Root");
_ObjectCallMethod( items , "InsertItem", h,"","Child 1");
_ObjectCallMethod( items , "InsertItem", h,"","Child 2");
_ObjectCallMethod(tree, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(tree, "TemplatePut", items)
_ObjectCallMethod(tree, "TemplatePut", h)
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.ExpandItem(h) = True");
|
|
484
|
How can I apply the same ConditionalFormat on more than 1(one) column (multiple columns and not on item)
OBJECT columns,conditionalformat,items,tree;
tree = ObjectByName("AN1") ;
_ObjectCallMethod( tree , "BeginUpdate");
conditionalformat = _ObjectCallMethod( _ObjectGetProperty( tree , "ConditionalFormats") , "Add", "1","K1");
_ObjectSetProperty( conditionalformat , "BackColor", 255);
_ObjectSetProperty( conditionalformat , "ApplyTo", 1);
conditionalformat = _ObjectCallMethod( _ObjectGetProperty( tree , "ConditionalFormats") , "Add", "1","K2");
_ObjectSetProperty( conditionalformat , "BackColor", 255);
_ObjectSetProperty( conditionalformat , "ApplyTo", 2);
_ObjectSetProperty( tree , "MarkSearchColumn", 0);
_ObjectSetProperty( tree , "DrawGridLines", -2);
columns = _ObjectGetProperty( tree , "Columns");
_ObjectCallMethod( columns , "Add", "Column 1");
_ObjectCallMethod( columns , "Add", "Column 2");
_ObjectCallMethod( columns , "Add", "Column 3");
items = _ObjectGetProperty( tree , "Items");
_ObjectCallMethod( items , "AddItem", );
_ObjectCallMethod( items , "AddItem", );
_ObjectCallMethod( items , "AddItem", );
_ObjectCallMethod( tree , "EndUpdate");
|
|
483
|
Is it possible to display empty strings for 0 values
OBJECT items,tree;
tree = ObjectByName("AN1") ;
_ObjectSetProperty( _ObjectCallMethod( _ObjectGetProperty( tree , "Columns") , "Add", "Currency") , "FormatColumn", "dbl(value) ? currency(dbl(value)) : ``");
items = _ObjectGetProperty( tree , "Items");
_ObjectCallMethod( items , "AddItem", 1.23);
_ObjectCallMethod( items , "AddItem", 2.34);
_ObjectCallMethod( items , "AddItem", 0);
_ObjectCallMethod( items , "AddItem", 10000.99);
|
|
482
|
Is it possible to display empty strings for 0 values
OBJECT items,tree;
tree = ObjectByName("AN1") ;
_ObjectCallMethod( _ObjectGetProperty( tree , "Columns") , "Add", "Number");
_ObjectSetProperty( _ObjectCallMethod( _ObjectGetProperty( tree , "Columns") , "Add", "Currency") , "ComputedField", "%0 ? currency(%0) : ``");
items = _ObjectGetProperty( tree , "Items");
_ObjectCallMethod( items , "AddItem", 1.23);
_ObjectCallMethod( items , "AddItem", 2.34);
_ObjectCallMethod( items , "AddItem", 0);
_ObjectCallMethod( items , "AddItem", 10000.99);
|
|
481
|
How can I get the list of items as they are displayed
OBJECT items,tree;
tree = ObjectByName("AN1") ;
_ObjectCallMethod( tree , "BeginUpdate");
_ObjectSetProperty( tree , "BackColorAlternate", 15790320);
_ObjectCallMethod( _ObjectGetProperty( tree , "Columns") , "Add", "Names");
items = _ObjectGetProperty( tree , "Items");
_ObjectCallMethod( items , "AddItem", "Mantel");
_ObjectCallMethod( items , "AddItem", "Mechanik");
_ObjectCallMethod( items , "AddItem", "Motor");
_ObjectCallMethod( items , "AddItem", "Murks");
_ObjectCallMethod( items , "AddItem", "Märchen");
_ObjectCallMethod( items , "AddItem", "Möhren");
_ObjectCallMethod( items , "AddItem", "Mühle");
_ObjectCallMethod(tree, "ExecuteTemplate", "Columns.Item(0).SortOrder = 1");
_ObjectCallMethod( tree , "EndUpdate");
Message( _ObjectCallMethod( tree , "GetItems", 1) );
|
|
480
|
Is posible to reduce the size of the picture to be shown in the column's caption
OBJECT tree;
tree = ObjectByName("AN1") ;
_ObjectCallMethod( tree , "BeginUpdate");
_ObjectCallMethod(tree, "ExecuteTemplate", "HTMLPicture(`pic1`) = `c:\exontrol\images\zipdisk.gif`");
_ObjectSetProperty( tree , "HeaderHeight", 48);
_ObjectSetProperty( _ObjectCallMethod( _ObjectGetProperty( tree , "Columns") , "Add", "DefaultSize") , "HTMLCaption", "Default-Size <img>pic1</img> Picture");
_ObjectSetProperty( _ObjectCallMethod( _ObjectGetProperty( tree , "Columns") , "Add", "CustomSize") , "HTMLCaption", "Custom-Size <img>pic1:16</img> Picture");
_ObjectCallMethod( tree , "EndUpdate");
|
|
479
|
How can I change the color, font, bold etc for the items/cells in the same column or for the entire column
OBJECT column,conditionalformat,items,tree;
tree = ObjectByName("AN1") ;
_ObjectCallMethod( tree , "BeginUpdate");
_ObjectSetProperty( tree , "MarkSearchColumn", 0);
conditionalformat = _ObjectCallMethod( _ObjectGetProperty( tree , "ConditionalFormats") , "Add", "1");
_ObjectSetProperty( conditionalformat , "Bold", -1);
_ObjectSetProperty( conditionalformat , "ForeColor", 255);
_ObjectSetProperty( conditionalformat , "ApplyTo", 1);
_ObjectCallMethod( _ObjectGetProperty( tree , "Columns") , "Add", "C1");
column = _ObjectCallMethod( _ObjectGetProperty( tree , "Columns") , "Add", "C2");
_ObjectSetProperty( column , "HeaderBold", -1);
_ObjectSetProperty( column , "HTMLCaption", "<fgcolor=FF0000>C2");
items = _ObjectGetProperty( tree , "Items");
_ObjectCallMethod(tree, "TemplatePut", "Dim iteObj")
_ObjectCallMethod(tree, "TemplatePut", items)
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(AddItem(10),1) = 11");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(AddItem(12),1) = 13");
_ObjectCallMethod( tree , "EndUpdate");
|
|
478
|
The item is not getting selected when clicking the cell's checkbox. What should I do
// CellStateChanged event - Fired after cell's state has been changed.
FUNCTION treeEvents_CellStateChanged(OBJECT tree, INT Item, INT ColIndex)
_ObjectCallMethod(tree, "TemplatePut", "Dim Item")
_ObjectCallMethod(tree, "TemplatePut", Item)
_ObjectCallMethod(tree, "ExecuteTemplate", "Items.SelectItem(Item) = True");
END
OBJECT items,tree;
tree = ObjectByName("AN1") ;
ObjectAssociateEvents("treeEvents", tree);
_ObjectCallMethod(tree, "ExecuteTemplate", "Columns.Add(`Check`).Def(0) = True");
items = _ObjectGetProperty( tree , "Items");
_ObjectCallMethod( items , "AddItem", 0);
_ObjectCallMethod( items , "AddItem", 1);
_ObjectCallMethod( items , "AddItem", 2);
_ObjectCallMethod( items , "AddItem", 3);
|
|
477
|
Is it possible to limit the height of the item while resizing
// AddItem event - Occurs after a new Item has been inserted to Items collection.
FUNCTION treeEvents_AddItem(OBJECT tree, INT Item)
_ObjectCallMethod(tree, "TemplatePut", "Dim Item")
_ObjectCallMethod(tree, "TemplatePut", Item)
_ObjectCallMethod(tree, "ExecuteTemplate", "Items.ItemMinHeight(Item) = 18");
_ObjectCallMethod(tree, "ExecuteTemplate", "Items.ItemMaxHeight(Item) = 72");
END
OBJECT items,tree;
tree = ObjectByName("AN1") ;
ObjectAssociateEvents("treeEvents", tree);
_ObjectCallMethod( tree , "BeginUpdate");
_ObjectSetProperty( tree , "ItemsAllowSizing", -1);
_ObjectSetProperty( tree , "ScrollBySingleLine", 0);
_ObjectSetProperty( tree , "BackColorAlternate", 15790320);
_ObjectCallMethod( _ObjectGetProperty( tree , "Columns") , "Add", "Names");
items = _ObjectGetProperty( tree , "Items");
_ObjectCallMethod( items , "AddItem", "Mantel");
_ObjectCallMethod( items , "AddItem", "Mechanik");
_ObjectCallMethod( items , "AddItem", "Motor");
_ObjectCallMethod( items , "AddItem", "Murks");
_ObjectCallMethod( items , "AddItem", "Märchen");
_ObjectCallMethod( items , "AddItem", "Möhren");
_ObjectCallMethod( items , "AddItem", "Mühle");
_ObjectCallMethod(tree, "ExecuteTemplate", "Columns.Item(0).SortOrder = 1");
_ObjectCallMethod( tree , "EndUpdate");
|
|
476
|
Is it possible to copy the hierarchy of the control using the GetItems method
OBJECT items,tree;
tree = ObjectByName("AN1") ;
_ObjectSetProperty( tree , "LinesAtRoot", -1);
_ObjectCallMethod( _ObjectGetProperty( tree , "Columns") , "Add", "Def");
items = _ObjectGetProperty( tree , "Items");
h = _ObjectCallMethod( items , "AddItem", "Root");
_ObjectCallMethod( items , "InsertItem", h,"","Child 1");
_ObjectCallMethod( items , "InsertItem", h,"","Child 2");
_ObjectCallMethod( tree , "PutItems", _ObjectCallMethod( tree , "GetItems", -1));
|
|
475
|
How can I show the child items with no identation
OBJECT items,tree;
tree = ObjectByName("AN1") ;
_ObjectSetProperty( tree , "LinesAtRoot", 5);
_ObjectSetProperty( tree , "Indent", 12);
_ObjectSetProperty( tree , "HasLines", 2);
_ObjectCallMethod( _ObjectGetProperty( tree , "Columns") , "Add", "Default");
items = _ObjectGetProperty( tree , "Items");
h = _ObjectCallMethod( items , "AddItem", "Root 1");
_ObjectCallMethod( items , "InsertItem", h,"","Child 1");
_ObjectCallMethod( items , "InsertItem", h,"","Child 2");
_ObjectCallMethod( items , "InsertItem", h,"","Child 3");
_ObjectCallMethod(tree, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(tree, "TemplatePut", items)
_ObjectCallMethod(tree, "TemplatePut", h)
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.ExpandItem(h) = True");
h = _ObjectCallMethod( items , "AddItem", "Root 2");
_ObjectCallMethod( items , "InsertItem", h,"","Child 1");
_ObjectCallMethod( items , "InsertItem", h,"","Child 2");
_ObjectCallMethod( items , "InsertItem", h,"","Child 3");
|
|
474
|
Is there other ways of showing the hierarchy lines (exGroupLinesAtRoot)
OBJECT items,tree;
tree = ObjectByName("AN1") ;
_ObjectSetProperty( tree , "LinesAtRoot", 1);
_ObjectSetProperty( tree , "Indent", 12);
_ObjectCallMethod( _ObjectGetProperty( tree , "Columns") , "Add", "Default");
items = _ObjectGetProperty( tree , "Items");
h = _ObjectCallMethod( items , "AddItem", "Root");
_ObjectCallMethod( items , "InsertItem", h,"","Child 1");
_ObjectCallMethod( items , "InsertItem", h,"","Child 2");
_ObjectCallMethod( items , "InsertItem", h,"","Child 3");
_ObjectCallMethod(tree, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(tree, "TemplatePut", items)
_ObjectCallMethod(tree, "TemplatePut", h)
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.ExpandItem(h) = True");
|
|
473
|
Is there other ways of showing the hierarchy lines (exGroupLinesOutside)
OBJECT items,tree;
tree = ObjectByName("AN1") ;
_ObjectSetProperty( tree , "LinesAtRoot", 5);
_ObjectSetProperty( tree , "Indent", 12);
_ObjectCallMethod( _ObjectGetProperty( tree , "Columns") , "Add", "Default");
items = _ObjectGetProperty( tree , "Items");
h = _ObjectCallMethod( items , "AddItem", "Root 1");
_ObjectCallMethod( items , "InsertItem", h,"","Child 1");
_ObjectCallMethod( items , "InsertItem", h,"","Child 2");
_ObjectCallMethod( items , "InsertItem", h,"","Child 3");
_ObjectCallMethod(tree, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(tree, "TemplatePut", items)
_ObjectCallMethod(tree, "TemplatePut", h)
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.ExpandItem(h) = True");
h = _ObjectCallMethod( items , "AddItem", "Root 2");
_ObjectCallMethod( items , "InsertItem", h,"","Child 1");
_ObjectCallMethod( items , "InsertItem", h,"","Child 2");
_ObjectCallMethod( items , "InsertItem", h,"","Child 3");
|
|
472
|
Is there other ways of showing the hierarchy lines (exGroupLinesInsideLeaf)
OBJECT items,tree;
tree = ObjectByName("AN1") ;
_ObjectSetProperty( tree , "LinesAtRoot", 4);
_ObjectSetProperty( tree , "Indent", 12);
_ObjectCallMethod( _ObjectGetProperty( tree , "Columns") , "Add", "Default");
items = _ObjectGetProperty( tree , "Items");
h = _ObjectCallMethod( items , "AddItem", "Root");
_ObjectCallMethod( items , "InsertItem", h,"","Child 1");
_ObjectCallMethod( items , "InsertItem", h,"","Child 2");
_ObjectCallMethod( items , "InsertItem", h,"","Child 3");
_ObjectCallMethod(tree, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(tree, "TemplatePut", items)
_ObjectCallMethod(tree, "TemplatePut", h)
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.ExpandItem(h) = True");
|
|
471
|
Is there other ways of showing the hierarchy lines (exGroupLinesInside)
OBJECT items,tree;
tree = ObjectByName("AN1") ;
_ObjectSetProperty( tree , "LinesAtRoot", 3);
_ObjectSetProperty( tree , "Indent", 12);
_ObjectCallMethod( _ObjectGetProperty( tree , "Columns") , "Add", "Default");
items = _ObjectGetProperty( tree , "Items");
h = _ObjectCallMethod( items , "AddItem", "Root");
_ObjectCallMethod( items , "InsertItem", h,"","Child 1");
_ObjectCallMethod( items , "InsertItem", h,"","Child 2");
_ObjectCallMethod( items , "InsertItem", h,"","Child 3");
_ObjectCallMethod(tree, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(tree, "TemplatePut", items)
_ObjectCallMethod(tree, "TemplatePut", h)
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.ExpandItem(h) = True");
|
|
470
|
Is there other ways of showing the hierarchy lines (exGroupLines)
OBJECT items,tree;
tree = ObjectByName("AN1") ;
_ObjectSetProperty( tree , "LinesAtRoot", 2);
_ObjectSetProperty( tree , "Indent", 12);
_ObjectCallMethod( _ObjectGetProperty( tree , "Columns") , "Add", "Default");
items = _ObjectGetProperty( tree , "Items");
h = _ObjectCallMethod( items , "AddItem", "Root");
_ObjectCallMethod( items , "InsertItem", h,"","Child 1");
_ObjectCallMethod( items , "InsertItem", _ObjectCallMethod( items , "InsertItem", h,"","Child 2"),"","SubChild 2");
_ObjectCallMethod( items , "InsertItem", h,"","Child 3");
_ObjectCallMethod(tree, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(tree, "TemplatePut", items)
_ObjectCallMethod(tree, "TemplatePut", h)
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.ExpandItem(h) = True");
|
|
469
|
Does your control supports multiple lines tooltip
OBJECT tree;
tree = ObjectByName("AN1") ;
_ObjectCallMethod(tree, "ExecuteTemplate", "HTMLPicture(`pic1`) = `c:\exontrol\images\zipdisk.gif`");
_ObjectSetProperty( tree , "ToolTipDelay", 1);
_ObjectSetProperty( _ObjectCallMethod( _ObjectGetProperty( tree , "Columns") , "Add", "tootip") , "ToolTip", "<br><font Tahoma;10>This</font> is a <b>multi-lines</b> tooltip assigned to a column. The tooltip supports built-in HTML tags, " +
"icons and pictures.<br><br><br><img>pic1</img> picture ... <br><br>");
|
|
468
|
How can I prevent highlighting the column from the cursor - point
OBJECT tree;
tree = ObjectByName("AN1") ;
_ObjectCallMethod( _ObjectGetProperty( tree , "VisualAppearance") , "Add", 1,"gBFLBCJwBAEHhEJAEGg4BI0IQAAYAQGKIYBkAKBQAGaAoDDUOQzQwAAxDKKUEwsACEIrjKCYVgOHYYRrIMYgBCMJhLEoaZLhEZRQiqDYtRDFQBSDDcPw/EaRZohGaYJ" +
"gEgI=");
_ObjectCallMethod(tree, "ExecuteTemplate", "Background(32) = 16777216");
_ObjectSetProperty( _ObjectCallMethod( _ObjectGetProperty( tree , "Columns") , "Add", "S") , "Width", 32);
_ObjectSetProperty( _ObjectCallMethod( _ObjectGetProperty( tree , "Columns") , "Add", "Level 1") , "LevelKey", 1);
_ObjectSetProperty( _ObjectCallMethod( _ObjectGetProperty( tree , "Columns") , "Add", "Level 2") , "LevelKey", 1);
_ObjectSetProperty( _ObjectCallMethod( _ObjectGetProperty( tree , "Columns") , "Add", "Level 3") , "LevelKey", 1);
_ObjectSetProperty( _ObjectCallMethod( _ObjectGetProperty( tree , "Columns") , "Add", "E1") , "Width", 32);
_ObjectSetProperty( _ObjectCallMethod( _ObjectGetProperty( tree , "Columns") , "Add", "E2") , "Width", 32);
_ObjectSetProperty( _ObjectCallMethod( _ObjectGetProperty( tree , "Columns") , "Add", "E3") , "Width", 32);
_ObjectSetProperty( _ObjectCallMethod( _ObjectGetProperty( tree , "Columns") , "Add", "E4") , "Width", 32);
|
|
467
|
Is there any option to show the tooltip programmatically
// MouseMove event - Occurs when the user moves the mouse.
FUNCTION treeEvents_MouseMove(OBJECT tree, INT Button, INT Shift, INT X, INT Y)
_ObjectCallMethod(tree, "TemplatePut", "Dim c,hit")
_ObjectCallMethod(tree, "TemplatePut", c)
_ObjectCallMethod(tree, "TemplatePut", hit)
_ObjectCallMethod( tree , "ShowToolTip", _ObjectCallMethod(tree, "ExecuteTemplate", "ItemFromPoint(-1,-1,c,hit)"),"","8","8");
END
OBJECT items,tree;
tree = ObjectByName("AN1") ;
ObjectAssociateEvents("treeEvents", tree);
_ObjectCallMethod( tree , "BeginUpdate");
_ObjectCallMethod( _ObjectGetProperty( tree , "Columns") , "Add", "Def");
items = _ObjectGetProperty( tree , "Items");
_ObjectCallMethod( items , "AddItem", "Item 1");
_ObjectCallMethod( items , "AddItem", "Item 2");
_ObjectCallMethod( items , "AddItem", "Item 3");
_ObjectCallMethod( tree , "EndUpdate");
|
|
466
|
Is it possible to prevent changing the rows/items colors by selection
OBJECT items,tree;
tree = ObjectByName("AN1") ;
_ObjectSetProperty( tree , "SelBackMode", 1);
_ObjectCallMethod(tree, "ExecuteTemplate", "Columns.Add(`HTML`).Def(17) = 1");
items = _ObjectGetProperty( tree , "Items");
_ObjectCallMethod( items , "AddItem", "<font ;12>T</font>his <b>is</b> an <a>html</a> <font Tahoma><fgcolor=FF0000>text</fgcolor></font>.");
_ObjectCallMethod(tree, "TemplatePut", "Dim iteObj")
_ObjectCallMethod(tree, "TemplatePut", items)
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.SelectItem(AddItem(`<font ;6>This</font> <b>is</b> another <a>html</a> <font Tahoma><fgcolor=FF0000>text</fgcolor></font>.`)) = True");
|
|
465
|
Is it possible to specify the cell's value but still want to display some formatted text instead the value
OBJECT items,tree;
tree = ObjectByName("AN1") ;
_ObjectCallMethod( tree , "BeginUpdate");
_ObjectSetProperty( tree , "MarkSearchColumn", 0);
_ObjectCallMethod( _ObjectGetProperty( tree , "Columns") , "Add", "Value");
_ObjectCallMethod( _ObjectGetProperty( tree , "Columns") , "Add", "FormatCell");
items = _ObjectGetProperty( tree , "Items");
h = _ObjectCallMethod( items , "AddItem", 1);
_ObjectCallMethod(tree, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(tree, "TemplatePut", items)
_ObjectCallMethod(tree, "TemplatePut", h)
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h,1) = 12");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.FormatCell(h,1) = `currency(value)`");
h = _ObjectCallMethod( items , "AddItem", "1/1/2001");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h,1) = #1/1/2001#");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaptionFormat(h,1) = 1");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.FormatCell(h,1) = `longdate(value) replace '2001' with '<b>2001</b>'`");
_ObjectCallMethod( tree , "EndUpdate");
|
|
464
|
How can I simulate displaying groups
OBJECT columns,items,tree;
tree = ObjectByName("AN1") ;
_ObjectCallMethod( tree , "BeginUpdate");
_ObjectSetProperty( tree , "HasLines", 0);
_ObjectSetProperty( tree , "ScrollBySingleLine", -1);
_ObjectSetProperty( tree , "MarkSearchColumn", 0);
columns = _ObjectGetProperty( tree , "Columns");
_ObjectCallMethod( columns , "Add", "Name");
_ObjectCallMethod( columns , "Add", "A");
_ObjectCallMethod( columns , "Add", "B");
_ObjectCallMethod( columns , "Add", "C");
items = _ObjectGetProperty( tree , "Items");
h = _ObjectCallMethod( items , "AddItem", "Group 1");
_ObjectCallMethod(tree, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(tree, "TemplatePut", items)
_ObjectCallMethod(tree, "TemplatePut", h)
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellHAlignment(h,0) = 1");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.ItemDivider(h) = 0");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.ItemDividerLineAlignment(h) = 3");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.ItemHeight(h) = 24");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.SortableItem(h) = False");
h1 = _ObjectCallMethod( items , "InsertItem", h,"","Child 1");
_ObjectCallMethod(tree, "TemplatePut", "Dim iteObj,h1")
_ObjectCallMethod(tree, "TemplatePut", items)
_ObjectCallMethod(tree, "TemplatePut", h1)
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h1,1) = 1");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h1,2) = 2");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h1,3) = 3");
h1 = _ObjectCallMethod( items , "InsertItem", h,"","Child 2");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h1,1) = 4");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h1,2) = 5");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h1,3) = 6");
_ObjectCallMethod(tree, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(tree, "TemplatePut", items)
_ObjectCallMethod(tree, "TemplatePut", h)
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.ExpandItem(h) = True");
h = _ObjectCallMethod( items , "AddItem", "Group 2");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellHAlignment(h,0) = 1");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.ItemDivider(h) = 0");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.ItemDividerLineAlignment(h) = 3");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.ItemHeight(h) = 24");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.SortableItem(h) = False");
h1 = _ObjectCallMethod( items , "InsertItem", h,"","Child 1");
_ObjectCallMethod(tree, "TemplatePut", "Dim iteObj,h1")
_ObjectCallMethod(tree, "TemplatePut", items)
_ObjectCallMethod(tree, "TemplatePut", h1)
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h1,1) = 1");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h1,2) = 2");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h1,3) = 3");
h1 = _ObjectCallMethod( items , "InsertItem", h,"","Child 2");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h1,1) = 4");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h1,2) = 5");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h1,3) = 6");
_ObjectCallMethod(tree, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(tree, "TemplatePut", items)
_ObjectCallMethod(tree, "TemplatePut", h)
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.ExpandItem(h) = True");
_ObjectCallMethod( tree , "EndUpdate");
|
|
463
|
How can I collapse all items
OBJECT items,tree;
tree = ObjectByName("AN1") ;
_ObjectCallMethod( tree , "BeginUpdate");
_ObjectSetProperty( tree , "LinesAtRoot", -1);
_ObjectCallMethod( _ObjectGetProperty( tree , "Columns") , "Add", "Items");
items = _ObjectGetProperty( tree , "Items");
h = _ObjectCallMethod( items , "AddItem", "Root 1");
_ObjectCallMethod( items , "InsertItem", h,"","Child 1");
_ObjectCallMethod( items , "InsertItem", h,"","Child 2");
h = _ObjectCallMethod( items , "AddItem", "Root 2");
_ObjectCallMethod( items , "InsertItem", h,"","Child 1");
_ObjectCallMethod( items , "InsertItem", h,"","Child 2");
_ObjectCallMethod(tree, "TemplatePut", "Dim iteObj")
_ObjectCallMethod(tree, "TemplatePut", items)
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.ExpandItem(0) = False");
_ObjectCallMethod( tree , "EndUpdate");
|
|
462
|
How can I expand all items
OBJECT items,tree;
tree = ObjectByName("AN1") ;
_ObjectCallMethod( tree , "BeginUpdate");
_ObjectSetProperty( tree , "LinesAtRoot", -1);
_ObjectCallMethod( _ObjectGetProperty( tree , "Columns") , "Add", "Items");
items = _ObjectGetProperty( tree , "Items");
h = _ObjectCallMethod( items , "AddItem", "Root 1");
_ObjectCallMethod( items , "InsertItem", h,"","Child 1");
_ObjectCallMethod( items , "InsertItem", h,"","Child 2");
h = _ObjectCallMethod( items , "AddItem", "Root 2");
_ObjectCallMethod( items , "InsertItem", h,"","Child 1");
_ObjectCallMethod( items , "InsertItem", h,"","Child 2");
_ObjectCallMethod(tree, "TemplatePut", "Dim iteObj")
_ObjectCallMethod(tree, "TemplatePut", items)
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.ExpandItem(0) = True");
_ObjectCallMethod( tree , "EndUpdate");
|
|
461
|
Can I use PNG images to display pictures in the control
OBJECT tree;
tree = ObjectByName("AN1") ;
_ObjectCallMethod(tree, "ExecuteTemplate", "HTMLPicture(`pic1`) = `c:\exontrol\images\card.png`");
_ObjectSetProperty( tree , "HeaderHeight", 48);
_ObjectSetProperty( _ObjectCallMethod( _ObjectGetProperty( tree , "Columns") , "Add", "ColumnName") , "HTMLCaption", "<b>HTML</b> Column <img>pic1</img> Picture");
|
|
460
|
Is it possible to move an item from a parent to another
OBJECT items,tree;
tree = ObjectByName("AN1") ;
_ObjectCallMethod( tree , "BeginUpdate");
_ObjectSetProperty( tree , "LinesAtRoot", -1);
_ObjectCallMethod( _ObjectGetProperty( tree , "Columns") , "Add", "Items");
items = _ObjectGetProperty( tree , "Items");
_ObjectCallMethod( items , "AddItem", "A");
_ObjectCallMethod( items , "AddItem", "B");
_ObjectCallMethod( items , "InsertItem", _ObjectCallMethod( items , "AddItem", "C"),"","D");
_ObjectCallMethod(tree, "TemplatePut", "Dim iteObj")
_ObjectCallMethod(tree, "TemplatePut", items)
_ObjectCallMethod( items , "SetParent", _ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.FindItem(`D`,0)"),_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.FindItem(`A`,0)"));
_ObjectCallMethod( tree , "EndUpdate");
|
|
459
|
How can I change the identation for an item
OBJECT items,tree;
tree = ObjectByName("AN1") ;
_ObjectCallMethod( tree , "BeginUpdate");
_ObjectSetProperty( tree , "LinesAtRoot", -1);
_ObjectCallMethod( _ObjectGetProperty( tree , "Columns") , "Add", "Items");
items = _ObjectGetProperty( tree , "Items");
_ObjectCallMethod( items , "AddItem", "A");
_ObjectCallMethod( items , "AddItem", "B");
_ObjectCallMethod( items , "InsertItem", _ObjectCallMethod( items , "AddItem", "C"),"","D");
_ObjectCallMethod(tree, "TemplatePut", "Dim iteObj")
_ObjectCallMethod(tree, "TemplatePut", items)
_ObjectCallMethod( items , "SetParent", _ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.FindItem(`D`,0)"),0);
_ObjectCallMethod( tree , "EndUpdate");
|
|
458
|
How can I filter programatically using more columns
OBJECT column,columns,items,tree;
tree = ObjectByName("AN1") ;
_ObjectCallMethod( tree , "BeginUpdate");
_ObjectSetProperty( tree , "MarkSearchColumn", 0);
columns = _ObjectGetProperty( tree , "Columns");
_ObjectCallMethod( columns , "Add", "Car");
_ObjectCallMethod( columns , "Add", "Equipment");
items = _ObjectGetProperty( tree , "Items");
_ObjectCallMethod(tree, "TemplatePut", "Dim iteObj")
_ObjectCallMethod(tree, "TemplatePut", items)
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(AddItem(`Mazda`),1) = `Air Bag`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(AddItem(`Toyota`),1) = `Air Bag,Air condition`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(AddItem(`Ford`),1) = `Air condition`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(AddItem(`Nissan`),1) = `Air Bag,ABS,ESP`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(AddItem(`Mazda`),1) = `Air Bag, ABS,ESP`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(AddItem(`Mazda`),1) = `ABS,ESP`");
column = _ObjectCallMethod(tree, "ExecuteTemplate", "Columns.Item(`Car`)");
_ObjectSetProperty( column , "FilterType", 240);
_ObjectSetProperty( column , "Filter", "Mazda");
column = _ObjectCallMethod(tree, "ExecuteTemplate", "Columns.Item(`Equipment`)");
_ObjectSetProperty( column , "FilterType", 3);
_ObjectSetProperty( column , "Filter", "*ABS*|*ESP*");
_ObjectCallMethod( tree , "ApplyFilter");
_ObjectCallMethod( tree , "EndUpdate");
|
|
457
|
Is it possible to colour a particular column, I mean the cell's foreground color
OBJECT columns,conditionalformat,items,tree;
tree = ObjectByName("AN1") ;
_ObjectCallMethod( tree , "BeginUpdate");
conditionalformat = _ObjectCallMethod( _ObjectGetProperty( tree , "ConditionalFormats") , "Add", "1");
_ObjectSetProperty( conditionalformat , "ForeColor", 255);
_ObjectSetProperty( conditionalformat , "ApplyTo", 1);
_ObjectSetProperty( tree , "MarkSearchColumn", 0);
columns = _ObjectGetProperty( tree , "Columns");
_ObjectCallMethod( columns , "Add", "Column 1");
_ObjectCallMethod( columns , "Add", "Column 2");
items = _ObjectGetProperty( tree , "Items");
_ObjectCallMethod(tree, "TemplatePut", "Dim iteObj")
_ObjectCallMethod(tree, "TemplatePut", items)
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(AddItem(0),1) = 1");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(AddItem(2),1) = 3");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(AddItem(4),1) = 5");
_ObjectCallMethod( tree , "EndUpdate");
|
|
456
|
Is it possible to colour a particular column for specified values
OBJECT columns,conditionalformat,items,tree;
tree = ObjectByName("AN1") ;
_ObjectCallMethod( tree , "BeginUpdate");
conditionalformat = _ObjectCallMethod( _ObjectGetProperty( tree , "ConditionalFormats") , "Add", "int(%1) in (3,4,5)");
_ObjectSetProperty( conditionalformat , "BackColor", 255);
_ObjectSetProperty( conditionalformat , "ApplyTo", 1);
_ObjectSetProperty( tree , "MarkSearchColumn", 0);
columns = _ObjectGetProperty( tree , "Columns");
_ObjectCallMethod( columns , "Add", "Column 1");
_ObjectCallMethod( columns , "Add", "Column 2");
items = _ObjectGetProperty( tree , "Items");
_ObjectCallMethod(tree, "TemplatePut", "Dim iteObj")
_ObjectCallMethod(tree, "TemplatePut", items)
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(AddItem(0),1) = 1");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(AddItem(2),1) = 3");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(AddItem(4),1) = 5");
_ObjectCallMethod( tree , "EndUpdate");
|
|
455
|
Is it possible to colour a particular column
OBJECT columns,items,tree;
tree = ObjectByName("AN1") ;
_ObjectCallMethod( tree , "BeginUpdate");
_ObjectSetProperty( tree , "MarkSearchColumn", 0);
columns = _ObjectGetProperty( tree , "Columns");
_ObjectCallMethod( columns , "Add", "Column 1");
_ObjectCallMethod(tree, "TemplatePut", "Dim colObj")
_ObjectCallMethod(tree, "TemplatePut", columns)
_ObjectCallMethod(tree, "ExecuteTemplate", "colObj.Add(`Column 2`).Def(4) = 255");
items = _ObjectGetProperty( tree , "Items");
_ObjectCallMethod(tree, "TemplatePut", "Dim iteObj")
_ObjectCallMethod(tree, "TemplatePut", items)
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(AddItem(0),1) = 1");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(AddItem(2),1) = 3");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(AddItem(4),1) = 5");
_ObjectCallMethod( tree , "EndUpdate");
|
|
454
|
How do i get all the children items that are under a certain parent Item handle
OBJECT items,tree;
tree = ObjectByName("AN1") ;
_ObjectCallMethod( tree , "BeginUpdate");
_ObjectSetProperty( tree , "LinesAtRoot", -1);
_ObjectCallMethod( _ObjectGetProperty( tree , "Columns") , "Add", "P");
items = _ObjectGetProperty( tree , "Items");
h = _ObjectCallMethod( items , "AddItem", "Root");
_ObjectCallMethod( items , "InsertItem", h,"","Child 1");
_ObjectCallMethod( items , "InsertItem", h,"","Child 2");
_ObjectCallMethod(tree, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(tree, "TemplatePut", items)
_ObjectCallMethod(tree, "TemplatePut", h)
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.ExpandItem(h) = True");
items = _ObjectGetProperty( tree , "Items");
_ObjectCallMethod(tree, "TemplatePut", "Dim iteObj")
_ObjectCallMethod(tree, "TemplatePut", items)
hChild = _ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.ItemChild(FirstVisibleItem)");
_ObjectCallMethod(tree, "TemplatePut", "Dim iteObj,hChild")
_ObjectCallMethod(tree, "TemplatePut", items)
_ObjectCallMethod(tree, "TemplatePut", hChild)
Message( _ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(hChild,0)") );
Message( _ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(NextSiblingItem(hChild),0)") );
_ObjectCallMethod( tree , "EndUpdate");
|
|
453
|
How can I get the caption of focused item
// SelectionChanged event - Fired after a new item has been selected.
FUNCTION treeEvents_SelectionChanged()
OBJECT items;
items = _ObjectGetProperty( tree , "Items");
_ObjectCallMethod(tree, "TemplatePut", "Dim iteObj")
_ObjectCallMethod(tree, "TemplatePut", items)
Message( "Handle" );
Message( _ObjectGetProperty( items , "FocusItem") );
Message( "Caption" );
Message( _ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(FocusItem,0)") );
END
OBJECT items,tree;
tree = ObjectByName("AN1") ;
ObjectAssociateEvents("treeEvents", tree);
_ObjectCallMethod( tree , "BeginUpdate");
_ObjectSetProperty( tree , "LinesAtRoot", -1);
_ObjectCallMethod( _ObjectGetProperty( tree , "Columns") , "Add", "Items");
items = _ObjectGetProperty( tree , "Items");
h = _ObjectCallMethod( items , "AddItem", "R1");
_ObjectCallMethod( items , "InsertItem", h,"","Cell 1.1");
_ObjectCallMethod( items , "InsertItem", h,"","Cell 1.2");
_ObjectCallMethod(tree, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(tree, "TemplatePut", items)
_ObjectCallMethod(tree, "TemplatePut", h)
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.ExpandItem(h) = True");
h = _ObjectCallMethod( items , "AddItem", "R2");
_ObjectCallMethod( items , "InsertItem", h,"","Cell 2.1");
_ObjectCallMethod( items , "InsertItem", h,"","Cell 2.2");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.ExpandItem(h) = True");
_ObjectCallMethod( tree , "EndUpdate");
|
|
452
|
How can I get the caption of selected item
// SelectionChanged event - Fired after a new item has been selected.
FUNCTION treeEvents_SelectionChanged()
OBJECT items;
items = _ObjectGetProperty( tree , "Items");
_ObjectCallMethod(tree, "TemplatePut", "Dim iteObj")
_ObjectCallMethod(tree, "TemplatePut", items)
Message( "Handle" );
Message( _ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.SelectedItem(0)") );
Message( "Caption" );
Message( _ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(SelectedItem(0),0)") );
END
OBJECT items,tree;
tree = ObjectByName("AN1") ;
ObjectAssociateEvents("treeEvents", tree);
_ObjectCallMethod( tree , "BeginUpdate");
_ObjectSetProperty( tree , "LinesAtRoot", -1);
_ObjectCallMethod( _ObjectGetProperty( tree , "Columns") , "Add", "Items");
items = _ObjectGetProperty( tree , "Items");
h = _ObjectCallMethod( items , "AddItem", "R1");
_ObjectCallMethod( items , "InsertItem", h,"","Cell 1.1");
_ObjectCallMethod( items , "InsertItem", h,"","Cell 1.2");
_ObjectCallMethod(tree, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(tree, "TemplatePut", items)
_ObjectCallMethod(tree, "TemplatePut", h)
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.ExpandItem(h) = True");
h = _ObjectCallMethod( items , "AddItem", "R2");
_ObjectCallMethod( items , "InsertItem", h,"","Cell 2.1");
_ObjectCallMethod( items , "InsertItem", h,"","Cell 2.2");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.ExpandItem(h) = True");
_ObjectCallMethod( tree , "EndUpdate");
|
|
451
|
Can I display the cell's check box after the text
OBJECT column,items,tree;
tree = ObjectByName("AN1") ;
column = _ObjectCallMethod( _ObjectGetProperty( tree , "Columns") , "Add", "Column");
_ObjectCallMethod(tree, "TemplatePut", "Dim colObj")
_ObjectCallMethod(tree, "TemplatePut", column)
_ObjectCallMethod(tree, "ExecuteTemplate", "colObj.Def(0) = True");
_ObjectCallMethod(tree, "ExecuteTemplate", "colObj.Def(34) = `caption,check`");
items = _ObjectGetProperty( tree , "Items");
_ObjectCallMethod(tree, "TemplatePut", "Dim iteObj")
_ObjectCallMethod(tree, "TemplatePut", items)
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellHasCheckBox(AddItem(`Caption 1`),0) = True");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellHasCheckBox(AddItem(`Caption 2`),0) = True");
|
|
450
|
Can I change the order of the parts in the cell, as checkbox after the text, and so on
OBJECT items,tree;
tree = ObjectByName("AN1") ;
_ObjectCallMethod( tree , "Images", "gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTq" +
"lVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m" +
"0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/y" +
"NAOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA=");
_ObjectCallMethod(tree, "ExecuteTemplate", "Columns.Add(`Column`).Def(34) = `caption,check,icon,icons,picture`");
items = _ObjectGetProperty( tree , "Items");
h = _ObjectCallMethod( items , "AddItem", "Text");
_ObjectCallMethod(tree, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(tree, "TemplatePut", items)
_ObjectCallMethod(tree, "TemplatePut", h)
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellImage(h,0) = 1");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellHasCheckBox(h,0) = True");
|
|
449
|
Can I have an image displayed after the text. Can I get that effect without using HTML content
OBJECT items,tree;
tree = ObjectByName("AN1") ;
_ObjectCallMethod( tree , "Images", "gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTq" +
"lVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m" +
"0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/y" +
"NAOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA=");
_ObjectCallMethod(tree, "ExecuteTemplate", "Columns.Add(`Column`).Def(34) = `caption,icon,check,icons,picture`");
items = _ObjectGetProperty( tree , "Items");
h = _ObjectCallMethod( items , "AddItem", "Text");
_ObjectCallMethod(tree, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(tree, "TemplatePut", items)
_ObjectCallMethod(tree, "TemplatePut", h)
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellImage(h,0) = 1");
|
|
448
|
Does your control support RightToLeft property for RTL languages or right to left
OBJECT column,items,tree;
tree = ObjectByName("AN1") ;
_ObjectCallMethod( tree , "BeginUpdate");
_ObjectSetProperty( tree , "ScrollBars", 15);
_ObjectSetProperty( tree , "LinesAtRoot", -1);
column = _ObjectCallMethod( _ObjectGetProperty( tree , "Columns") , "Add", "P1");
_ObjectCallMethod(tree, "TemplatePut", "Dim colObj")
_ObjectCallMethod(tree, "TemplatePut", column)
_ObjectCallMethod(tree, "ExecuteTemplate", "colObj.Def(0) = True");
_ObjectSetProperty( column , "PartialCheck", -1);
items = _ObjectGetProperty( tree , "Items");
h = _ObjectCallMethod( items , "AddItem", "Root");
_ObjectCallMethod( items , "InsertItem", h,"","Child 1");
_ObjectCallMethod( items , "InsertItem", h,"","Child 2");
_ObjectCallMethod(tree, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(tree, "TemplatePut", items)
_ObjectCallMethod(tree, "TemplatePut", h)
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.ExpandItem(h) = True");
_ObjectSetProperty( tree , "RightToLeft", -1);
_ObjectCallMethod( tree , "EndUpdate");
|
|
447
|
Is there any way to display the vertical scroll bar on the left side, as I want to align my data to the right
OBJECT columns,tree;
tree = ObjectByName("AN1") ;
_ObjectCallMethod( tree , "BeginUpdate");
_ObjectSetProperty( tree , "ScrollBars", 15);
columns = _ObjectGetProperty( tree , "Columns");
_ObjectCallMethod( columns , "Add", "C1");
_ObjectCallMethod( columns , "Add", "C2");
_ObjectCallMethod( columns , "Add", "C3");
_ObjectCallMethod( columns , "Add", "C4");
_ObjectCallMethod( columns , "Add", "C5");
_ObjectCallMethod( columns , "Add", "C6");
_ObjectCallMethod( columns , "Add", "C7");
_ObjectCallMethod( columns , "Add", "C8");
_ObjectSetProperty( tree , "RightToLeft", -1);
_ObjectCallMethod( tree , "EndUpdate");
|
|
446
|
How can I use the CASE statement (CASE usage)
OBJECT column,items,tree;
tree = ObjectByName("AN1") ;
_ObjectCallMethod( tree , "BeginUpdate");
_ObjectSetProperty( _ObjectCallMethod( _ObjectGetProperty( tree , "Columns") , "Add", "Value") , "Width", 24);
column = _ObjectCallMethod( _ObjectGetProperty( tree , "Columns") , "Add", "CASE - statment");
_ObjectSetProperty( column , "ComputedField", "%0 case (default:'not found';1:%0;2:2*%0;3:3*%0;4:4*%0;5:5*%0;7:'Seven';8:'Eight';9:'Nine';11:'Eleven';13:'Thirtheen';14:'Fourt" +
"heen')");
_ObjectSetProperty( column , "ToolTip", _ObjectGetProperty( column , "ComputedField"));
items = _ObjectGetProperty( tree , "Items");
_ObjectCallMethod( items , "AddItem", 0);
_ObjectCallMethod( items , "AddItem", 1);
_ObjectCallMethod( items , "AddItem", 2);
_ObjectCallMethod( tree , "EndUpdate");
|
|
445
|
How can I use the CASE statement (CASE usage)
OBJECT column,items,tree;
tree = ObjectByName("AN1") ;
_ObjectCallMethod( tree , "BeginUpdate");
_ObjectSetProperty( _ObjectCallMethod( _ObjectGetProperty( tree , "Columns") , "Add", "Value") , "Width", 24);
column = _ObjectCallMethod( _ObjectGetProperty( tree , "Columns") , "Add", "CASE - statment");
_ObjectSetProperty( column , "ComputedField", "%0 case (default:'not found';1:'One';2:'Two';3:'Three';4:'Four';5:'Five';7:'Seven';8:'Eight';9:'Nine';11:'Eleven';13:'Thirtheen" +
"';14:'Fourtheen')");
_ObjectSetProperty( column , "ToolTip", _ObjectGetProperty( column , "ComputedField"));
items = _ObjectGetProperty( tree , "Items");
_ObjectCallMethod( items , "AddItem", 0);
_ObjectCallMethod( items , "AddItem", 1);
_ObjectCallMethod( items , "AddItem", 2);
_ObjectCallMethod( tree , "EndUpdate");
|
|
444
|
I have seen the IN function but it returns -1 or 0. How can I display the value being found ( SWITCH usage )
OBJECT column,items,tree;
tree = ObjectByName("AN1") ;
_ObjectCallMethod( tree , "BeginUpdate");
_ObjectSetProperty( _ObjectCallMethod( _ObjectGetProperty( tree , "Columns") , "Add", "Value") , "Width", 24);
column = _ObjectCallMethod( _ObjectGetProperty( tree , "Columns") , "Add", "SWITCH - statment");
_ObjectSetProperty( column , "ComputedField", "%0 switch ('not found', 1,2,3,4,5,7,8,9,11,13,14)");
_ObjectSetProperty( column , "ToolTip", _ObjectGetProperty( column , "ComputedField"));
items = _ObjectGetProperty( tree , "Items");
_ObjectCallMethod( items , "AddItem", 0);
_ObjectCallMethod( items , "AddItem", 1);
_ObjectCallMethod( items , "AddItem", 2);
_ObjectCallMethod( tree , "EndUpdate");
|
|
443
|
I have a large collection of constant values and using or operator is a time consuming (IN usage). Is there any way to increase the speed to check if a value maches the collection
OBJECT column,items,tree;
tree = ObjectByName("AN1") ;
_ObjectCallMethod( tree , "BeginUpdate");
_ObjectSetProperty( _ObjectCallMethod( _ObjectGetProperty( tree , "Columns") , "Add", "Value") , "Width", 24);
column = _ObjectCallMethod( _ObjectGetProperty( tree , "Columns") , "Add", "IN - statment");
_ObjectSetProperty( column , "ComputedField", "%0 in (1,2,3,4,5,7,8,9,11,13,14) ? 'found' : ''");
_ObjectSetProperty( column , "ToolTip", _ObjectGetProperty( column , "ComputedField"));
items = _ObjectGetProperty( tree , "Items");
_ObjectCallMethod( items , "AddItem", 0);
_ObjectCallMethod( items , "AddItem", 1);
_ObjectCallMethod( items , "AddItem", 2);
_ObjectCallMethod( tree , "EndUpdate");
|
|
442
|
Is is possible to use HTML tags to display in the filter caption
OBJECT items,tree;
tree = ObjectByName("AN1") ;
_ObjectCallMethod( tree , "BeginUpdate");
_ObjectSetProperty( tree , "FilterBarPromptVisible", -1);
_ObjectSetProperty( tree , "FilterBarCaption", "This is a bit of text being displayed in the filter bar.");
_ObjectCallMethod( _ObjectGetProperty( tree , "Columns") , "Add", "");
items = _ObjectGetProperty( tree , "Items");
_ObjectCallMethod( items , "AddItem", "Item 1");
_ObjectCallMethod( items , "AddItem", "Item 2");
_ObjectCallMethod( items , "AddItem", "Item 3");
_ObjectCallMethod( tree , "EndUpdate");
|
|
441
|
How can I find the number of items after filtering
OBJECT items,tree;
tree = ObjectByName("AN1") ;
_ObjectCallMethod( tree , "BeginUpdate");
_ObjectCallMethod( _ObjectGetProperty( tree , "Columns") , "Add", "");
items = _ObjectGetProperty( tree , "Items");
h = _ObjectCallMethod( items , "AddItem", "");
_ObjectCallMethod(tree, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(tree, "TemplatePut", items)
_ObjectCallMethod(tree, "TemplatePut", h)
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h,0) = VisibleItemCount");
_ObjectCallMethod( tree , "EndUpdate");
|
|
440
|
How can I change the filter caption
OBJECT columns,items,tree;
tree = ObjectByName("AN1") ;
_ObjectCallMethod( tree , "BeginUpdate");
_ObjectSetProperty( tree , "ColumnAutoResize", -1);
_ObjectSetProperty( tree , "ContinueColumnScroll", 0);
_ObjectSetProperty( tree , "MarkSearchColumn", 0);
_ObjectSetProperty( tree , "SearchColumnIndex", 1);
_ObjectSetProperty( tree , "FilterBarPromptVisible", -1);
_ObjectSetProperty( tree , "FilterBarPromptType", 12801);
_ObjectSetProperty( tree , "FilterBarPromptPattern", "london robert");
_ObjectSetProperty( tree , "FilterBarCaption", "<r>Found: ... ");
columns = _ObjectGetProperty( tree , "Columns");
_ObjectSetProperty( _ObjectCallMethod( columns , "Add", "Name") , "Width", 96);
_ObjectSetProperty( _ObjectCallMethod( columns , "Add", "Title") , "Width", 96);
_ObjectCallMethod( columns , "Add", "City");
items = _ObjectGetProperty( tree , "Items");
h0 = _ObjectCallMethod( items , "AddItem", "Nancy Davolio");
_ObjectCallMethod(tree, "TemplatePut", "Dim iteObj,h0")
_ObjectCallMethod(tree, "TemplatePut", items)
_ObjectCallMethod(tree, "TemplatePut", h0)
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Sales Representative`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `Seattle`");
h0 = _ObjectCallMethod( items , "AddItem", "Andrew Fuller");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Vice President, Sales`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `Tacoma`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.SelectItem(h0) = True");
h0 = _ObjectCallMethod( items , "AddItem", "Janet Leverling");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Sales Representative`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `Kirkland`");
h0 = _ObjectCallMethod( items , "AddItem", "Margaret Peacock");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Sales Representative`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `Redmond`");
h0 = _ObjectCallMethod( items , "AddItem", "Steven Buchanan");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Sales Manager`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `London`");
h0 = _ObjectCallMethod( items , "AddItem", "Michael Suyama");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Sales Representative`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `London`");
h0 = _ObjectCallMethod( items , "AddItem", "Robert King");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Sales Representative`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `London`");
h0 = _ObjectCallMethod( items , "AddItem", "Laura Callahan");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Inside Sales Coordinator`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `Seattle`");
h0 = _ObjectCallMethod( items , "AddItem", "Anne Dodsworth");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Sales Representative`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `London`");
_ObjectCallMethod( tree , "EndUpdate");
|
|
439
|
While using the filter prompt is it is possible to use wild characters
OBJECT columns,items,tree;
tree = ObjectByName("AN1") ;
_ObjectCallMethod( tree , "BeginUpdate");
_ObjectSetProperty( tree , "ColumnAutoResize", -1);
_ObjectSetProperty( tree , "ContinueColumnScroll", 0);
_ObjectSetProperty( tree , "MarkSearchColumn", 0);
_ObjectSetProperty( tree , "SearchColumnIndex", 1);
_ObjectSetProperty( tree , "FilterBarPromptVisible", -1);
_ObjectSetProperty( tree , "FilterBarPromptType", 16);
_ObjectSetProperty( tree , "FilterBarPromptPattern", "lon* seat*");
columns = _ObjectGetProperty( tree , "Columns");
_ObjectSetProperty( _ObjectCallMethod( columns , "Add", "Name") , "Width", 96);
_ObjectSetProperty( _ObjectCallMethod( columns , "Add", "Title") , "Width", 96);
_ObjectCallMethod( columns , "Add", "City");
items = _ObjectGetProperty( tree , "Items");
h0 = _ObjectCallMethod( items , "AddItem", "Nancy Davolio");
_ObjectCallMethod(tree, "TemplatePut", "Dim iteObj,h0")
_ObjectCallMethod(tree, "TemplatePut", items)
_ObjectCallMethod(tree, "TemplatePut", h0)
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Sales Representative`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `Seattle`");
h0 = _ObjectCallMethod( items , "AddItem", "Andrew Fuller");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Vice President, Sales`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `Tacoma`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.SelectItem(h0) = True");
h0 = _ObjectCallMethod( items , "AddItem", "Janet Leverling");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Sales Representative`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `Kirkland`");
h0 = _ObjectCallMethod( items , "AddItem", "Margaret Peacock");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Sales Representative`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `Redmond`");
h0 = _ObjectCallMethod( items , "AddItem", "Steven Buchanan");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Sales Manager`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `London`");
h0 = _ObjectCallMethod( items , "AddItem", "Michael Suyama");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Sales Representative`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `London`");
h0 = _ObjectCallMethod( items , "AddItem", "Robert King");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Sales Representative`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `London`");
h0 = _ObjectCallMethod( items , "AddItem", "Laura Callahan");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Inside Sales Coordinator`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `Seattle`");
h0 = _ObjectCallMethod( items , "AddItem", "Anne Dodsworth");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Sales Representative`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `London`");
_ObjectCallMethod( tree , "EndUpdate");
|
|
438
|
How can I list all items that contains any of specified words, not necessary at the beggining
OBJECT columns,items,tree;
tree = ObjectByName("AN1") ;
_ObjectCallMethod( tree , "BeginUpdate");
_ObjectSetProperty( tree , "ColumnAutoResize", -1);
_ObjectSetProperty( tree , "ContinueColumnScroll", 0);
_ObjectSetProperty( tree , "MarkSearchColumn", 0);
_ObjectSetProperty( tree , "SearchColumnIndex", 1);
_ObjectSetProperty( tree , "FilterBarPromptVisible", -1);
_ObjectSetProperty( tree , "FilterBarPromptType", 4610);
_ObjectSetProperty( tree , "FilterBarPromptPattern", "london davolio");
columns = _ObjectGetProperty( tree , "Columns");
_ObjectSetProperty( _ObjectCallMethod( columns , "Add", "Name") , "Width", 96);
_ObjectSetProperty( _ObjectCallMethod( columns , "Add", "Title") , "Width", 96);
_ObjectCallMethod( columns , "Add", "City");
items = _ObjectGetProperty( tree , "Items");
h0 = _ObjectCallMethod( items , "AddItem", "Nancy Davolio");
_ObjectCallMethod(tree, "TemplatePut", "Dim iteObj,h0")
_ObjectCallMethod(tree, "TemplatePut", items)
_ObjectCallMethod(tree, "TemplatePut", h0)
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Sales Representative`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `Seattle`");
h0 = _ObjectCallMethod( items , "AddItem", "Andrew Fuller");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Vice President, Sales`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `Tacoma`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.SelectItem(h0) = True");
h0 = _ObjectCallMethod( items , "AddItem", "Janet Leverling");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Sales Representative`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `Kirkland`");
h0 = _ObjectCallMethod( items , "AddItem", "Margaret Peacock");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Sales Representative`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `Redmond`");
h0 = _ObjectCallMethod( items , "AddItem", "Steven Buchanan");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Sales Manager`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `London`");
h0 = _ObjectCallMethod( items , "AddItem", "Michael Suyama");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Sales Representative`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `London`");
h0 = _ObjectCallMethod( items , "AddItem", "Robert King");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Sales Representative`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `London`");
h0 = _ObjectCallMethod( items , "AddItem", "Laura Callahan");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Inside Sales Coordinator`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `Seattle`");
h0 = _ObjectCallMethod( items , "AddItem", "Anne Dodsworth");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Sales Representative`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `London`");
_ObjectCallMethod( tree , "EndUpdate");
|
|
437
|
How can I list all items that contains any of specified words, not strings
OBJECT columns,items,tree;
tree = ObjectByName("AN1") ;
_ObjectCallMethod( tree , "BeginUpdate");
_ObjectSetProperty( tree , "ColumnAutoResize", -1);
_ObjectSetProperty( tree , "ContinueColumnScroll", 0);
_ObjectSetProperty( tree , "MarkSearchColumn", 0);
_ObjectSetProperty( tree , "SearchColumnIndex", 1);
_ObjectSetProperty( tree , "FilterBarPromptVisible", -1);
_ObjectSetProperty( tree , "FilterBarPromptType", 12802);
_ObjectSetProperty( tree , "FilterBarPromptPattern", "london nancy");
columns = _ObjectGetProperty( tree , "Columns");
_ObjectSetProperty( _ObjectCallMethod( columns , "Add", "Name") , "Width", 96);
_ObjectSetProperty( _ObjectCallMethod( columns , "Add", "Title") , "Width", 96);
_ObjectCallMethod( columns , "Add", "City");
items = _ObjectGetProperty( tree , "Items");
h0 = _ObjectCallMethod( items , "AddItem", "Nancy Davolio");
_ObjectCallMethod(tree, "TemplatePut", "Dim iteObj,h0")
_ObjectCallMethod(tree, "TemplatePut", items)
_ObjectCallMethod(tree, "TemplatePut", h0)
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Sales Representative`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `Seattle`");
h0 = _ObjectCallMethod( items , "AddItem", "Andrew Fuller");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Vice President, Sales`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `Tacoma`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.SelectItem(h0) = True");
h0 = _ObjectCallMethod( items , "AddItem", "Janet Leverling");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Sales Representative`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `Kirkland`");
h0 = _ObjectCallMethod( items , "AddItem", "Margaret Peacock");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Sales Representative`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `Redmond`");
h0 = _ObjectCallMethod( items , "AddItem", "Steven Buchanan");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Sales Manager`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `London`");
h0 = _ObjectCallMethod( items , "AddItem", "Michael Suyama");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Sales Representative`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `London`");
h0 = _ObjectCallMethod( items , "AddItem", "Robert King");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Sales Representative`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `London`");
h0 = _ObjectCallMethod( items , "AddItem", "Laura Callahan");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Inside Sales Coordinator`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `Seattle`");
h0 = _ObjectCallMethod( items , "AddItem", "Anne Dodsworth");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Sales Representative`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `London`");
_ObjectCallMethod( tree , "EndUpdate");
|
|
436
|
How can I list all items that contains all specified words, not strings
OBJECT columns,items,tree;
tree = ObjectByName("AN1") ;
_ObjectCallMethod( tree , "BeginUpdate");
_ObjectSetProperty( tree , "ColumnAutoResize", -1);
_ObjectSetProperty( tree , "ContinueColumnScroll", 0);
_ObjectSetProperty( tree , "MarkSearchColumn", 0);
_ObjectSetProperty( tree , "SearchColumnIndex", 1);
_ObjectSetProperty( tree , "FilterBarPromptVisible", -1);
_ObjectSetProperty( tree , "FilterBarPromptType", 12801);
_ObjectSetProperty( tree , "FilterBarPromptPattern", "london robert");
columns = _ObjectGetProperty( tree , "Columns");
_ObjectSetProperty( _ObjectCallMethod( columns , "Add", "Name") , "Width", 96);
_ObjectSetProperty( _ObjectCallMethod( columns , "Add", "Title") , "Width", 96);
_ObjectCallMethod( columns , "Add", "City");
items = _ObjectGetProperty( tree , "Items");
h0 = _ObjectCallMethod( items , "AddItem", "Nancy Davolio");
_ObjectCallMethod(tree, "TemplatePut", "Dim iteObj,h0")
_ObjectCallMethod(tree, "TemplatePut", items)
_ObjectCallMethod(tree, "TemplatePut", h0)
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Sales Representative`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `Seattle`");
h0 = _ObjectCallMethod( items , "AddItem", "Andrew Fuller");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Vice President, Sales`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `Tacoma`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.SelectItem(h0) = True");
h0 = _ObjectCallMethod( items , "AddItem", "Janet Leverling");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Sales Representative`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `Kirkland`");
h0 = _ObjectCallMethod( items , "AddItem", "Margaret Peacock");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Sales Representative`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `Redmond`");
h0 = _ObjectCallMethod( items , "AddItem", "Steven Buchanan");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Sales Manager`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `London`");
h0 = _ObjectCallMethod( items , "AddItem", "Michael Suyama");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Sales Representative`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `London`");
h0 = _ObjectCallMethod( items , "AddItem", "Robert King");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Sales Representative`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `London`");
h0 = _ObjectCallMethod( items , "AddItem", "Laura Callahan");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Inside Sales Coordinator`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `Seattle`");
h0 = _ObjectCallMethod( items , "AddItem", "Anne Dodsworth");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Sales Representative`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `London`");
_ObjectCallMethod( tree , "EndUpdate");
|
|
435
|
I've noticed that the filtering by prompt is not case sensitive, is is possible to make it case sensitive
OBJECT columns,items,tree;
tree = ObjectByName("AN1") ;
_ObjectCallMethod( tree , "BeginUpdate");
_ObjectSetProperty( tree , "ColumnAutoResize", -1);
_ObjectSetProperty( tree , "ContinueColumnScroll", 0);
_ObjectSetProperty( tree , "MarkSearchColumn", 0);
_ObjectSetProperty( tree , "SearchColumnIndex", 1);
_ObjectSetProperty( tree , "FilterBarPromptVisible", -1);
_ObjectSetProperty( tree , "FilterBarPromptType", 258);
_ObjectSetProperty( tree , "FilterBarPromptPattern", "Anne");
columns = _ObjectGetProperty( tree , "Columns");
_ObjectSetProperty( _ObjectCallMethod( columns , "Add", "Name") , "Width", 96);
_ObjectSetProperty( _ObjectCallMethod( columns , "Add", "Title") , "Width", 96);
_ObjectCallMethod( columns , "Add", "City");
items = _ObjectGetProperty( tree , "Items");
h0 = _ObjectCallMethod( items , "AddItem", "Nancy Davolio");
_ObjectCallMethod(tree, "TemplatePut", "Dim iteObj,h0")
_ObjectCallMethod(tree, "TemplatePut", items)
_ObjectCallMethod(tree, "TemplatePut", h0)
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Sales Representative`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `Seattle`");
h0 = _ObjectCallMethod( items , "AddItem", "Andrew Fuller");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Vice President, Sales`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `Tacoma`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.SelectItem(h0) = True");
h0 = _ObjectCallMethod( items , "AddItem", "Janet Leverling");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Sales Representative`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `Kirkland`");
h0 = _ObjectCallMethod( items , "AddItem", "Margaret Peacock");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Sales Representative`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `Redmond`");
h0 = _ObjectCallMethod( items , "AddItem", "Steven Buchanan");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Sales Manager`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `London`");
h0 = _ObjectCallMethod( items , "AddItem", "Michael Suyama");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Sales Representative`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `London`");
h0 = _ObjectCallMethod( items , "AddItem", "Robert King");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Sales Representative`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `London`");
h0 = _ObjectCallMethod( items , "AddItem", "Laura Callahan");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Inside Sales Coordinator`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `Seattle`");
h0 = _ObjectCallMethod( items , "AddItem", "Anne Dodsworth");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Sales Representative`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `London`");
_ObjectCallMethod( tree , "EndUpdate");
|
|
434
|
Is it possible to list only items that ends with any of specified strings
OBJECT columns,items,tree;
tree = ObjectByName("AN1") ;
_ObjectCallMethod( tree , "BeginUpdate");
_ObjectSetProperty( tree , "ColumnAutoResize", -1);
_ObjectSetProperty( tree , "ContinueColumnScroll", 0);
_ObjectSetProperty( tree , "MarkSearchColumn", 0);
_ObjectSetProperty( tree , "SearchColumnIndex", 1);
_ObjectSetProperty( tree , "FilterBarPromptVisible", -1);
_ObjectSetProperty( tree , "FilterBarPromptType", 4);
_ObjectSetProperty( tree , "FilterBarPromptColumns", "0");
_ObjectSetProperty( tree , "FilterBarPromptPattern", "Fuller");
columns = _ObjectGetProperty( tree , "Columns");
_ObjectSetProperty( _ObjectCallMethod( columns , "Add", "Name") , "Width", 96);
_ObjectSetProperty( _ObjectCallMethod( columns , "Add", "Title") , "Width", 96);
_ObjectCallMethod( columns , "Add", "City");
items = _ObjectGetProperty( tree , "Items");
h0 = _ObjectCallMethod( items , "AddItem", "Nancy Davolio");
_ObjectCallMethod(tree, "TemplatePut", "Dim iteObj,h0")
_ObjectCallMethod(tree, "TemplatePut", items)
_ObjectCallMethod(tree, "TemplatePut", h0)
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Sales Representative`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `Seattle`");
h0 = _ObjectCallMethod( items , "AddItem", "Andrew Fuller");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Vice President, Sales`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `Tacoma`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.SelectItem(h0) = True");
h0 = _ObjectCallMethod( items , "AddItem", "Janet Leverling");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Sales Representative`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `Kirkland`");
h0 = _ObjectCallMethod( items , "AddItem", "Margaret Peacock");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Sales Representative`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `Redmond`");
h0 = _ObjectCallMethod( items , "AddItem", "Steven Buchanan");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Sales Manager`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `London`");
h0 = _ObjectCallMethod( items , "AddItem", "Michael Suyama");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Sales Representative`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `London`");
h0 = _ObjectCallMethod( items , "AddItem", "Robert King");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Sales Representative`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `London`");
h0 = _ObjectCallMethod( items , "AddItem", "Laura Callahan");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Inside Sales Coordinator`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `Seattle`");
h0 = _ObjectCallMethod( items , "AddItem", "Anne Dodsworth");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Sales Representative`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `London`");
_ObjectCallMethod( tree , "EndUpdate");
|
|
433
|
Is it possible to list only items that ends with any of specified strings
OBJECT columns,items,tree;
tree = ObjectByName("AN1") ;
_ObjectCallMethod( tree , "BeginUpdate");
_ObjectSetProperty( tree , "ColumnAutoResize", -1);
_ObjectSetProperty( tree , "ContinueColumnScroll", 0);
_ObjectSetProperty( tree , "MarkSearchColumn", 0);
_ObjectSetProperty( tree , "SearchColumnIndex", 1);
_ObjectSetProperty( tree , "FilterBarPromptVisible", -1);
_ObjectSetProperty( tree , "FilterBarPromptType", 4);
_ObjectSetProperty( tree , "FilterBarPromptColumns", "0");
_ObjectSetProperty( tree , "FilterBarPromptPattern", "Fuller");
columns = _ObjectGetProperty( tree , "Columns");
_ObjectSetProperty( _ObjectCallMethod( columns , "Add", "Name") , "Width", 96);
_ObjectSetProperty( _ObjectCallMethod( columns , "Add", "Title") , "Width", 96);
_ObjectCallMethod( columns , "Add", "City");
items = _ObjectGetProperty( tree , "Items");
h0 = _ObjectCallMethod( items , "AddItem", "Nancy Davolio");
_ObjectCallMethod(tree, "TemplatePut", "Dim iteObj,h0")
_ObjectCallMethod(tree, "TemplatePut", items)
_ObjectCallMethod(tree, "TemplatePut", h0)
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Sales Representative`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `Seattle`");
h0 = _ObjectCallMethod( items , "AddItem", "Andrew Fuller");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Vice President, Sales`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `Tacoma`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.SelectItem(h0) = True");
h0 = _ObjectCallMethod( items , "AddItem", "Janet Leverling");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Sales Representative`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `Kirkland`");
h0 = _ObjectCallMethod( items , "AddItem", "Margaret Peacock");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Sales Representative`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `Redmond`");
h0 = _ObjectCallMethod( items , "AddItem", "Steven Buchanan");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Sales Manager`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `London`");
h0 = _ObjectCallMethod( items , "AddItem", "Michael Suyama");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Sales Representative`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `London`");
h0 = _ObjectCallMethod( items , "AddItem", "Robert King");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Sales Representative`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `London`");
h0 = _ObjectCallMethod( items , "AddItem", "Laura Callahan");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Inside Sales Coordinator`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `Seattle`");
h0 = _ObjectCallMethod( items , "AddItem", "Anne Dodsworth");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Sales Representative`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `London`");
_ObjectCallMethod( tree , "EndUpdate");
|
|
432
|
Is it possible to list only items that starts with any of specified strings
OBJECT columns,items,tree;
tree = ObjectByName("AN1") ;
_ObjectCallMethod( tree , "BeginUpdate");
_ObjectSetProperty( tree , "ColumnAutoResize", -1);
_ObjectSetProperty( tree , "ContinueColumnScroll", 0);
_ObjectSetProperty( tree , "MarkSearchColumn", 0);
_ObjectSetProperty( tree , "SearchColumnIndex", 1);
_ObjectSetProperty( tree , "FilterBarPromptVisible", -1);
_ObjectSetProperty( tree , "FilterBarPromptType", 3);
_ObjectSetProperty( tree , "FilterBarPromptColumns", "0");
_ObjectSetProperty( tree , "FilterBarPromptPattern", "An M");
columns = _ObjectGetProperty( tree , "Columns");
_ObjectSetProperty( _ObjectCallMethod( columns , "Add", "Name") , "Width", 96);
_ObjectSetProperty( _ObjectCallMethod( columns , "Add", "Title") , "Width", 96);
_ObjectCallMethod( columns , "Add", "City");
items = _ObjectGetProperty( tree , "Items");
h0 = _ObjectCallMethod( items , "AddItem", "Nancy Davolio");
_ObjectCallMethod(tree, "TemplatePut", "Dim iteObj,h0")
_ObjectCallMethod(tree, "TemplatePut", items)
_ObjectCallMethod(tree, "TemplatePut", h0)
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Sales Representative`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `Seattle`");
h0 = _ObjectCallMethod( items , "AddItem", "Andrew Fuller");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Vice President, Sales`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `Tacoma`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.SelectItem(h0) = True");
h0 = _ObjectCallMethod( items , "AddItem", "Janet Leverling");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Sales Representative`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `Kirkland`");
h0 = _ObjectCallMethod( items , "AddItem", "Margaret Peacock");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Sales Representative`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `Redmond`");
h0 = _ObjectCallMethod( items , "AddItem", "Steven Buchanan");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Sales Manager`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `London`");
h0 = _ObjectCallMethod( items , "AddItem", "Michael Suyama");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Sales Representative`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `London`");
h0 = _ObjectCallMethod( items , "AddItem", "Robert King");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Sales Representative`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `London`");
h0 = _ObjectCallMethod( items , "AddItem", "Laura Callahan");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Inside Sales Coordinator`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `Seattle`");
h0 = _ObjectCallMethod( items , "AddItem", "Anne Dodsworth");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Sales Representative`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `London`");
_ObjectCallMethod( tree , "EndUpdate");
|
|
431
|
Is it possible to list only items that starts with specified string
OBJECT columns,items,tree;
tree = ObjectByName("AN1") ;
_ObjectCallMethod( tree , "BeginUpdate");
_ObjectSetProperty( tree , "ColumnAutoResize", -1);
_ObjectSetProperty( tree , "ContinueColumnScroll", 0);
_ObjectSetProperty( tree , "MarkSearchColumn", 0);
_ObjectSetProperty( tree , "SearchColumnIndex", 1);
_ObjectSetProperty( tree , "FilterBarPromptVisible", -1);
_ObjectSetProperty( tree , "FilterBarPromptType", 3);
_ObjectSetProperty( tree , "FilterBarPromptColumns", "0");
_ObjectSetProperty( tree , "FilterBarPromptPattern", "A");
columns = _ObjectGetProperty( tree , "Columns");
_ObjectSetProperty( _ObjectCallMethod( columns , "Add", "Name") , "Width", 96);
_ObjectSetProperty( _ObjectCallMethod( columns , "Add", "Title") , "Width", 96);
_ObjectCallMethod( columns , "Add", "City");
items = _ObjectGetProperty( tree , "Items");
h0 = _ObjectCallMethod( items , "AddItem", "Nancy Davolio");
_ObjectCallMethod(tree, "TemplatePut", "Dim iteObj,h0")
_ObjectCallMethod(tree, "TemplatePut", items)
_ObjectCallMethod(tree, "TemplatePut", h0)
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Sales Representative`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `Seattle`");
h0 = _ObjectCallMethod( items , "AddItem", "Andrew Fuller");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Vice President, Sales`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `Tacoma`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.SelectItem(h0) = True");
h0 = _ObjectCallMethod( items , "AddItem", "Janet Leverling");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Sales Representative`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `Kirkland`");
h0 = _ObjectCallMethod( items , "AddItem", "Margaret Peacock");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Sales Representative`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `Redmond`");
h0 = _ObjectCallMethod( items , "AddItem", "Steven Buchanan");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Sales Manager`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `London`");
h0 = _ObjectCallMethod( items , "AddItem", "Michael Suyama");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Sales Representative`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `London`");
h0 = _ObjectCallMethod( items , "AddItem", "Robert King");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Sales Representative`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `London`");
h0 = _ObjectCallMethod( items , "AddItem", "Laura Callahan");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Inside Sales Coordinator`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `Seattle`");
h0 = _ObjectCallMethod( items , "AddItem", "Anne Dodsworth");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Sales Representative`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `London`");
_ObjectCallMethod( tree , "EndUpdate");
|
|
430
|
How can I specify that the list should include any of the seqeunces in the pattern
OBJECT columns,items,tree;
tree = ObjectByName("AN1") ;
_ObjectCallMethod( tree , "BeginUpdate");
_ObjectSetProperty( tree , "ColumnAutoResize", -1);
_ObjectSetProperty( tree , "ContinueColumnScroll", 0);
_ObjectSetProperty( tree , "MarkSearchColumn", 0);
_ObjectSetProperty( tree , "SearchColumnIndex", 1);
_ObjectSetProperty( tree , "FilterBarPromptVisible", -1);
_ObjectSetProperty( tree , "FilterBarPromptType", 2);
_ObjectSetProperty( tree , "FilterBarPromptPattern", "london seattle");
columns = _ObjectGetProperty( tree , "Columns");
_ObjectSetProperty( _ObjectCallMethod( columns , "Add", "Name") , "Width", 96);
_ObjectSetProperty( _ObjectCallMethod( columns , "Add", "Title") , "Width", 96);
_ObjectCallMethod( columns , "Add", "City");
items = _ObjectGetProperty( tree , "Items");
h0 = _ObjectCallMethod( items , "AddItem", "Nancy Davolio");
_ObjectCallMethod(tree, "TemplatePut", "Dim iteObj,h0")
_ObjectCallMethod(tree, "TemplatePut", items)
_ObjectCallMethod(tree, "TemplatePut", h0)
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Sales Representative`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `Seattle`");
h0 = _ObjectCallMethod( items , "AddItem", "Andrew Fuller");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Vice President, Sales`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `Tacoma`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.SelectItem(h0) = True");
h0 = _ObjectCallMethod( items , "AddItem", "Janet Leverling");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Sales Representative`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `Kirkland`");
h0 = _ObjectCallMethod( items , "AddItem", "Margaret Peacock");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Sales Representative`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `Redmond`");
h0 = _ObjectCallMethod( items , "AddItem", "Steven Buchanan");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Sales Manager`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `London`");
h0 = _ObjectCallMethod( items , "AddItem", "Michael Suyama");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Sales Representative`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `London`");
h0 = _ObjectCallMethod( items , "AddItem", "Robert King");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Sales Representative`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `London`");
h0 = _ObjectCallMethod( items , "AddItem", "Laura Callahan");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Inside Sales Coordinator`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `Seattle`");
h0 = _ObjectCallMethod( items , "AddItem", "Anne Dodsworth");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Sales Representative`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `London`");
_ObjectCallMethod( tree , "EndUpdate");
|
|
429
|
How can I specify that all sequences in the filter pattern must be included in the list
OBJECT columns,items,tree;
tree = ObjectByName("AN1") ;
_ObjectCallMethod( tree , "BeginUpdate");
_ObjectSetProperty( tree , "ColumnAutoResize", -1);
_ObjectSetProperty( tree , "ContinueColumnScroll", 0);
_ObjectSetProperty( tree , "MarkSearchColumn", 0);
_ObjectSetProperty( tree , "SearchColumnIndex", 1);
_ObjectSetProperty( tree , "FilterBarPromptVisible", -1);
_ObjectSetProperty( tree , "FilterBarPromptType", 1);
_ObjectSetProperty( tree , "FilterBarPromptPattern", "london manager");
columns = _ObjectGetProperty( tree , "Columns");
_ObjectSetProperty( _ObjectCallMethod( columns , "Add", "Name") , "Width", 96);
_ObjectSetProperty( _ObjectCallMethod( columns , "Add", "Title") , "Width", 96);
_ObjectCallMethod( columns , "Add", "City");
items = _ObjectGetProperty( tree , "Items");
h0 = _ObjectCallMethod( items , "AddItem", "Nancy Davolio");
_ObjectCallMethod(tree, "TemplatePut", "Dim iteObj,h0")
_ObjectCallMethod(tree, "TemplatePut", items)
_ObjectCallMethod(tree, "TemplatePut", h0)
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Sales Representative`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `Seattle`");
h0 = _ObjectCallMethod( items , "AddItem", "Andrew Fuller");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Vice President, Sales`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `Tacoma`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.SelectItem(h0) = True");
h0 = _ObjectCallMethod( items , "AddItem", "Janet Leverling");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Sales Representative`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `Kirkland`");
h0 = _ObjectCallMethod( items , "AddItem", "Margaret Peacock");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Sales Representative`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `Redmond`");
h0 = _ObjectCallMethod( items , "AddItem", "Steven Buchanan");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Sales Manager`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `London`");
h0 = _ObjectCallMethod( items , "AddItem", "Michael Suyama");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Sales Representative`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `London`");
h0 = _ObjectCallMethod( items , "AddItem", "Robert King");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Sales Representative`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `London`");
h0 = _ObjectCallMethod( items , "AddItem", "Laura Callahan");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Inside Sales Coordinator`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `Seattle`");
h0 = _ObjectCallMethod( items , "AddItem", "Anne Dodsworth");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Sales Representative`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `London`");
_ObjectCallMethod( tree , "EndUpdate");
|
|
428
|
How do I change at runtime the filter prompt
OBJECT columns,items,tree;
tree = ObjectByName("AN1") ;
_ObjectCallMethod( tree , "BeginUpdate");
_ObjectSetProperty( tree , "ColumnAutoResize", -1);
_ObjectSetProperty( tree , "ContinueColumnScroll", 0);
_ObjectSetProperty( tree , "MarkSearchColumn", 0);
_ObjectSetProperty( tree , "SearchColumnIndex", 1);
_ObjectSetProperty( tree , "FilterBarPromptVisible", -1);
_ObjectSetProperty( tree , "FilterBarPromptPattern", "london manager");
columns = _ObjectGetProperty( tree , "Columns");
_ObjectSetProperty( _ObjectCallMethod( columns , "Add", "Name") , "Width", 96);
_ObjectSetProperty( _ObjectCallMethod( columns , "Add", "Title") , "Width", 96);
_ObjectCallMethod( columns , "Add", "City");
items = _ObjectGetProperty( tree , "Items");
h0 = _ObjectCallMethod( items , "AddItem", "Nancy Davolio");
_ObjectCallMethod(tree, "TemplatePut", "Dim iteObj,h0")
_ObjectCallMethod(tree, "TemplatePut", items)
_ObjectCallMethod(tree, "TemplatePut", h0)
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Sales Representative`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `Seattle`");
h0 = _ObjectCallMethod( items , "AddItem", "Andrew Fuller");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Vice President, Sales`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `Tacoma`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.SelectItem(h0) = True");
h0 = _ObjectCallMethod( items , "AddItem", "Janet Leverling");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Sales Representative`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `Kirkland`");
h0 = _ObjectCallMethod( items , "AddItem", "Margaret Peacock");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Sales Representative`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `Redmond`");
h0 = _ObjectCallMethod( items , "AddItem", "Steven Buchanan");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Sales Manager`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `London`");
h0 = _ObjectCallMethod( items , "AddItem", "Michael Suyama");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Sales Representative`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `London`");
h0 = _ObjectCallMethod( items , "AddItem", "Robert King");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Sales Representative`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `London`");
h0 = _ObjectCallMethod( items , "AddItem", "Laura Callahan");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Inside Sales Coordinator`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `Seattle`");
h0 = _ObjectCallMethod( items , "AddItem", "Anne Dodsworth");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Sales Representative`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `London`");
_ObjectCallMethod( tree , "EndUpdate");
|
|
427
|
How do I specify to filter only a single column when using the filter prompt
OBJECT columns,items,tree;
tree = ObjectByName("AN1") ;
_ObjectCallMethod( tree , "BeginUpdate");
_ObjectSetProperty( tree , "ColumnAutoResize", -1);
_ObjectSetProperty( tree , "ContinueColumnScroll", 0);
_ObjectSetProperty( tree , "MarkSearchColumn", 0);
_ObjectSetProperty( tree , "SearchColumnIndex", 1);
_ObjectSetProperty( tree , "FilterBarPromptVisible", -1);
_ObjectSetProperty( tree , "FilterBarPromptColumns", "2,3");
_ObjectSetProperty( tree , "FilterBarPromptPattern", "london");
columns = _ObjectGetProperty( tree , "Columns");
_ObjectSetProperty( _ObjectCallMethod( columns , "Add", "Name") , "Width", 96);
_ObjectSetProperty( _ObjectCallMethod( columns , "Add", "Title") , "Width", 96);
_ObjectCallMethod( columns , "Add", "City");
items = _ObjectGetProperty( tree , "Items");
h0 = _ObjectCallMethod( items , "AddItem", "Nancy Davolio");
_ObjectCallMethod(tree, "TemplatePut", "Dim iteObj,h0")
_ObjectCallMethod(tree, "TemplatePut", items)
_ObjectCallMethod(tree, "TemplatePut", h0)
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Sales Representative`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `Seattle`");
h0 = _ObjectCallMethod( items , "AddItem", "Andrew Fuller");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Vice President, Sales`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `Tacoma`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.SelectItem(h0) = True");
h0 = _ObjectCallMethod( items , "AddItem", "Janet Leverling");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Sales Representative`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `Kirkland`");
h0 = _ObjectCallMethod( items , "AddItem", "Margaret Peacock");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Sales Representative`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `Redmond`");
h0 = _ObjectCallMethod( items , "AddItem", "Steven Buchanan");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Sales Manager`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `London`");
h0 = _ObjectCallMethod( items , "AddItem", "Michael Suyama");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Sales Representative`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `London`");
h0 = _ObjectCallMethod( items , "AddItem", "Robert King");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Sales Representative`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `London`");
h0 = _ObjectCallMethod( items , "AddItem", "Laura Callahan");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Inside Sales Coordinator`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `Seattle`");
h0 = _ObjectCallMethod( items , "AddItem", "Anne Dodsworth");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Sales Representative`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `London`");
_ObjectCallMethod( tree , "EndUpdate");
|
|
426
|
How do I change the prompt or the caption being displayed in the filter bar
OBJECT columns,tree;
tree = ObjectByName("AN1") ;
_ObjectCallMethod( tree , "BeginUpdate");
_ObjectSetProperty( tree , "ColumnAutoResize", -1);
_ObjectSetProperty( tree , "ContinueColumnScroll", 0);
_ObjectSetProperty( tree , "MarkSearchColumn", 0);
_ObjectSetProperty( tree , "SearchColumnIndex", 1);
_ObjectSetProperty( tree , "FilterBarPromptVisible", -1);
_ObjectSetProperty( tree , "FilterBarPrompt", "changed");
columns = _ObjectGetProperty( tree , "Columns");
_ObjectSetProperty( _ObjectCallMethod( columns , "Add", "Name") , "Width", 96);
_ObjectSetProperty( _ObjectCallMethod( columns , "Add", "Title") , "Width", 96);
_ObjectCallMethod( columns , "Add", "City");
_ObjectCallMethod( tree , "EndUpdate");
|
|
425
|
How do I enable the filter prompt feature
OBJECT columns,items,tree;
tree = ObjectByName("AN1") ;
_ObjectCallMethod( tree , "BeginUpdate");
_ObjectSetProperty( tree , "ColumnAutoResize", -1);
_ObjectSetProperty( tree , "ContinueColumnScroll", 0);
_ObjectSetProperty( tree , "MarkSearchColumn", 0);
_ObjectSetProperty( tree , "SearchColumnIndex", 1);
_ObjectSetProperty( tree , "FilterBarPromptVisible", -1);
columns = _ObjectGetProperty( tree , "Columns");
_ObjectSetProperty( _ObjectCallMethod( columns , "Add", "Name") , "Width", 96);
_ObjectSetProperty( _ObjectCallMethod( columns , "Add", "Title") , "Width", 96);
_ObjectCallMethod( columns , "Add", "City");
items = _ObjectGetProperty( tree , "Items");
h0 = _ObjectCallMethod( items , "AddItem", "Nancy Davolio");
_ObjectCallMethod(tree, "TemplatePut", "Dim iteObj,h0")
_ObjectCallMethod(tree, "TemplatePut", items)
_ObjectCallMethod(tree, "TemplatePut", h0)
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Sales Representative`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `Seattle`");
h0 = _ObjectCallMethod( items , "AddItem", "Andrew Fuller");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Vice President, Sales`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `Tacoma`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.SelectItem(h0) = True");
h0 = _ObjectCallMethod( items , "AddItem", "Janet Leverling");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Sales Representative`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `Kirkland`");
h0 = _ObjectCallMethod( items , "AddItem", "Margaret Peacock");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Sales Representative`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `Redmond`");
h0 = _ObjectCallMethod( items , "AddItem", "Steven Buchanan");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Sales Manager`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `London`");
h0 = _ObjectCallMethod( items , "AddItem", "Michael Suyama");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Sales Representative`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `London`");
h0 = _ObjectCallMethod( items , "AddItem", "Robert King");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Sales Representative`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `London`");
h0 = _ObjectCallMethod( items , "AddItem", "Laura Callahan");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Inside Sales Coordinator`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `Seattle`");
h0 = _ObjectCallMethod( items , "AddItem", "Anne Dodsworth");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,1) = `Sales Representative`");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h0,2) = `London`");
_ObjectCallMethod( tree , "EndUpdate");
|
|
424
|
I have an EBN file how can I apply different colors to it, so no need to create a new one
OBJECT items,tree;
tree = ObjectByName("AN1") ;
_ObjectCallMethod( _ObjectGetProperty( tree , "VisualAppearance") , "Add", 1,"c:\exontrol\images\normal.ebn");
_ObjectSetProperty( tree , "SelBackColor", _ObjectGetProperty( tree , "BackColor"));
_ObjectSetProperty( tree , "SelForeColor", _ObjectGetProperty( tree , "ForeColor"));
_ObjectSetProperty( tree , "HasLines", 0);
_ObjectCallMethod( _ObjectGetProperty( tree , "Columns") , "Add", "Default");
items = _ObjectGetProperty( tree , "Items");
h = _ObjectCallMethod( items , "AddItem", "Root");
hC = _ObjectCallMethod( items , "InsertItem", h,"","Default");
_ObjectCallMethod(tree, "TemplatePut", "Dim iteObj,hC")
_ObjectCallMethod(tree, "TemplatePut", items)
_ObjectCallMethod(tree, "TemplatePut", hC)
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.ItemBackColor(hC) = 16777216");
_ObjectCallMethod(tree, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(tree, "TemplatePut", items)
_ObjectCallMethod(tree, "TemplatePut", h)
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.ItemHeight(InsertItem(h,,``)) = 6");
hC = _ObjectCallMethod( items , "InsertItem", h,"","Light Green");
_ObjectCallMethod(tree, "TemplatePut", "Dim iteObj,hC")
_ObjectCallMethod(tree, "TemplatePut", items)
_ObjectCallMethod(tree, "TemplatePut", hC)
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.ItemBackColor(hC) = 16842496");
_ObjectCallMethod(tree, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(tree, "TemplatePut", items)
_ObjectCallMethod(tree, "TemplatePut", h)
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.ItemHeight(InsertItem(h,,``)) = 6");
hC = _ObjectCallMethod( items , "InsertItem", h,"","Dark Green");
_ObjectCallMethod(tree, "TemplatePut", "Dim iteObj,hC")
_ObjectCallMethod(tree, "TemplatePut", items)
_ObjectCallMethod(tree, "TemplatePut", hC)
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.ItemBackColor(hC) = 16809728");
_ObjectCallMethod(tree, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(tree, "TemplatePut", items)
_ObjectCallMethod(tree, "TemplatePut", h)
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.ItemHeight(InsertItem(h,,``)) = 6");
hC = _ObjectCallMethod( items , "InsertItem", h,"","Magenta");
_ObjectCallMethod(tree, "TemplatePut", "Dim iteObj,hC")
_ObjectCallMethod(tree, "TemplatePut", items)
_ObjectCallMethod(tree, "TemplatePut", hC)
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.ItemBackColor(hC) = 33521663");
_ObjectCallMethod(tree, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(tree, "TemplatePut", items)
_ObjectCallMethod(tree, "TemplatePut", h)
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.ItemHeight(InsertItem(h,,``)) = 6");
hC = _ObjectCallMethod( items , "InsertItem", h,"","Yellow");
_ObjectCallMethod(tree, "TemplatePut", "Dim iteObj,hC")
_ObjectCallMethod(tree, "TemplatePut", items)
_ObjectCallMethod(tree, "TemplatePut", hC)
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.ItemBackColor(hC) = 25165823");
_ObjectCallMethod(tree, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(tree, "TemplatePut", items)
_ObjectCallMethod(tree, "TemplatePut", h)
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.ItemHeight(InsertItem(h,,``)) = 6");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.ExpandItem(h) = True");
|
|
423
|
How can I change the foreground color for a particular column
OBJECT columns,tree;
tree = ObjectByName("AN1") ;
columns = _ObjectGetProperty( tree , "Columns");
_ObjectCallMethod( columns , "Add", "Column 1");
_ObjectCallMethod(tree, "TemplatePut", "Dim colObj")
_ObjectCallMethod(tree, "TemplatePut", columns)
_ObjectCallMethod(tree, "ExecuteTemplate", "colObj.Add(`Column 2`).Def(8) = 8439039");
_ObjectCallMethod( columns , "Add", "Column 3");
|
|
422
|
How can I change the background color for a particular column
OBJECT columns,tree;
tree = ObjectByName("AN1") ;
columns = _ObjectGetProperty( tree , "Columns");
_ObjectCallMethod( columns , "Add", "Column 1");
_ObjectCallMethod(tree, "TemplatePut", "Dim colObj")
_ObjectCallMethod(tree, "TemplatePut", columns)
_ObjectCallMethod(tree, "ExecuteTemplate", "colObj.Add(`Column 2`).Def(7) = 8439039");
_ObjectCallMethod( columns , "Add", "Column 3");
|
|
421
|
How can I display the column using currency format and enlarge the font for certain values
OBJECT column,items,tree;
tree = ObjectByName("AN1") ;
column = _ObjectCallMethod( _ObjectGetProperty( tree , "Columns") , "Add", "Currency");
_ObjectCallMethod(tree, "TemplatePut", "Dim colObj")
_ObjectCallMethod(tree, "TemplatePut", column)
_ObjectCallMethod(tree, "ExecuteTemplate", "colObj.Def(17) = 1");
_ObjectSetProperty( column , "FormatColumn", "len(value) ? ((0:=dbl(value)) < 10 ? '<fgcolor=808080><font ;7>' : '<b>') + currency(=:0)");
items = _ObjectGetProperty( tree , "Items");
_ObjectCallMethod( items , "AddItem", "1.23");
_ObjectCallMethod( items , "AddItem", "2.34");
_ObjectCallMethod( items , "AddItem", "9.94");
_ObjectCallMethod( items , "AddItem", "11.94");
_ObjectCallMethod( items , "AddItem", "1000");
|
|
420
|
How can I highlight only parts of the cells
OBJECT column,items,tree;
tree = ObjectByName("AN1") ;
column = _ObjectCallMethod( _ObjectGetProperty( tree , "Columns") , "Add", "");
_ObjectCallMethod(tree, "TemplatePut", "Dim colObj")
_ObjectCallMethod(tree, "TemplatePut", column)
_ObjectCallMethod(tree, "ExecuteTemplate", "colObj.Def(17) = 1");
_ObjectSetProperty( column , "FormatColumn", "value replace 'hil' with '<fgcolor=FF0000><b>hil</b></fgcolor>'");
items = _ObjectGetProperty( tree , "Items");
h = _ObjectCallMethod( items , "AddItem", "Root");
_ObjectCallMethod( items , "InsertItem", h,"","Child 1");
_ObjectCallMethod( items , "InsertItem", h,"","Child 2");
_ObjectCallMethod( items , "InsertItem", h,"","Child 3");
_ObjectCallMethod(tree, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(tree, "TemplatePut", items)
_ObjectCallMethod(tree, "TemplatePut", h)
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.ExpandItem(h) = True");
|
|
419
|
How can I get the number of occurrences of a specified string in the cell
OBJECT column,items,tree;
tree = ObjectByName("AN1") ;
_ObjectCallMethod( _ObjectGetProperty( tree , "Columns") , "Add", "");
column = _ObjectCallMethod( _ObjectGetProperty( tree , "Columns") , "Add", "occurrences");
_ObjectSetProperty( column , "ComputedField", "lower(%0) count 'o'");
_ObjectSetProperty( column , "FormatColumn", "'contains ' + value + ' of \'o\' chars'");
items = _ObjectGetProperty( tree , "Items");
h = _ObjectCallMethod( items , "AddItem", "Root");
_ObjectCallMethod( items , "InsertItem", h,"","Child 1 oooof the root");
_ObjectCallMethod( items , "InsertItem", h,"","Child 2");
_ObjectCallMethod( items , "InsertItem", h,"","Child 3");
_ObjectCallMethod(tree, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(tree, "TemplatePut", items)
_ObjectCallMethod(tree, "TemplatePut", h)
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.ExpandItem(h) = True");
|
|
418
|
How can I display dates in my format
OBJECT column,items,tree;
tree = ObjectByName("AN1") ;
column = _ObjectCallMethod( _ObjectGetProperty( tree , "Columns") , "Add", "Date");
_ObjectCallMethod(tree, "TemplatePut", "Dim colObj")
_ObjectCallMethod(tree, "TemplatePut", column)
_ObjectCallMethod(tree, "ExecuteTemplate", "colObj.Def(17) = 1");
_ObjectSetProperty( column , "FormatColumn", "'<b>' + year(0:=date(value)) + '</b><fgcolor=808080><font ;6> (' + month(=:0) + ' - ' + day(=:0) +')'");
items = _ObjectGetProperty( tree , "Items");
_ObjectCallMethod( items , "AddItem", "1/21/2001");
_ObjectCallMethod( items , "AddItem", "2/22/2002");
_ObjectCallMethod( items , "AddItem", "3/13/2003");
_ObjectCallMethod( items , "AddItem", "4/24/2004");
|
|
417
|
How can I display dates in short format
OBJECT items,tree;
tree = ObjectByName("AN1") ;
_ObjectSetProperty( _ObjectCallMethod( _ObjectGetProperty( tree , "Columns") , "Add", "Date") , "FormatColumn", "shortdate(value)");
items = _ObjectGetProperty( tree , "Items");
_ObjectCallMethod( items , "AddItem", "1/1/2001");
_ObjectCallMethod( items , "AddItem", "2/2/2002");
_ObjectCallMethod( items , "AddItem", "3/3/2003");
_ObjectCallMethod( items , "AddItem", "4/4/2004");
|
|
416
|
How can I display dates in long format
OBJECT items,tree;
tree = ObjectByName("AN1") ;
_ObjectSetProperty( _ObjectCallMethod( _ObjectGetProperty( tree , "Columns") , "Add", "Date") , "FormatColumn", "longdate(value)");
items = _ObjectGetProperty( tree , "Items");
_ObjectCallMethod( items , "AddItem", "1/1/2001");
_ObjectCallMethod( items , "AddItem", "2/2/2002");
_ObjectCallMethod( items , "AddItem", "3/3/2003");
_ObjectCallMethod( items , "AddItem", "4/4/2004");
|
|
415
|
How can I display only the right part of the cell
OBJECT column,items,tree;
tree = ObjectByName("AN1") ;
_ObjectCallMethod( _ObjectGetProperty( tree , "Columns") , "Add", "");
column = _ObjectCallMethod( _ObjectGetProperty( tree , "Columns") , "Add", "Right");
_ObjectSetProperty( column , "ComputedField", "%0 right 2");
_ObjectSetProperty( column , "FormatColumn", "'^"' + value + '^"'");
items = _ObjectGetProperty( tree , "Items");
h = _ObjectCallMethod( items , "AddItem", "Root");
_ObjectCallMethod( items , "InsertItem", h,"","Child 1");
_ObjectCallMethod( items , "InsertItem", h,"","Child 2");
_ObjectCallMethod( items , "InsertItem", h,"","SChild 3");
_ObjectCallMethod(tree, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(tree, "TemplatePut", items)
_ObjectCallMethod(tree, "TemplatePut", h)
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.ExpandItem(h) = True");
|
|
414
|
How can I display only the left part of the cell
OBJECT items,tree;
tree = ObjectByName("AN1") ;
_ObjectCallMethod( _ObjectGetProperty( tree , "Columns") , "Add", "");
_ObjectSetProperty( _ObjectCallMethod( _ObjectGetProperty( tree , "Columns") , "Add", "Left") , "ComputedField", "%0 left 2");
items = _ObjectGetProperty( tree , "Items");
h = _ObjectCallMethod( items , "AddItem", "Root");
_ObjectCallMethod( items , "InsertItem", h,"","Child 1");
_ObjectCallMethod( items , "InsertItem", h,"","Child 2");
_ObjectCallMethod( items , "InsertItem", h,"","SChild 3");
_ObjectCallMethod(tree, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(tree, "TemplatePut", items)
_ObjectCallMethod(tree, "TemplatePut", h)
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.ExpandItem(h) = True");
|
|
413
|
How can I display true or false instead 0 and -1
OBJECT items,tree;
tree = ObjectByName("AN1") ;
_ObjectSetProperty( _ObjectCallMethod( _ObjectGetProperty( tree , "Columns") , "Add", "Boolean") , "FormatColumn", "value != 0 ? 'true' : 'false'");
items = _ObjectGetProperty( tree , "Items");
_ObjectCallMethod( items , "AddItem", -1);
_ObjectCallMethod( items , "AddItem", 0);
_ObjectCallMethod( items , "AddItem", -1);
_ObjectCallMethod( items , "AddItem", 0);
_ObjectCallMethod( items , "AddItem", 1);
|
|
412
|
How can I display icons or images instead numbers
OBJECT column,items,tree;
tree = ObjectByName("AN1") ;
_ObjectCallMethod( tree , "Images", "gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTq" +
"lVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m" +
"0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/y" +
"NAOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA=");
column = _ObjectCallMethod( _ObjectGetProperty( tree , "Columns") , "Add", "Icons");
_ObjectCallMethod(tree, "TemplatePut", "Dim colObj")
_ObjectCallMethod(tree, "TemplatePut", column)
_ObjectCallMethod(tree, "ExecuteTemplate", "colObj.Def(17) = 1");
_ObjectSetProperty( column , "FormatColumn", "'The cell displays the icon <img>'+value+'</img> instead ' + value");
items = _ObjectGetProperty( tree , "Items");
_ObjectCallMethod( items , "AddItem", 1);
_ObjectCallMethod( items , "AddItem", 2);
_ObjectCallMethod( items , "AddItem", 3);
|
|
411
|
How can I display the column using currency
OBJECT items,tree;
tree = ObjectByName("AN1") ;
_ObjectSetProperty( _ObjectCallMethod( _ObjectGetProperty( tree , "Columns") , "Add", "Currency") , "FormatColumn", "currency(dbl(value))");
items = _ObjectGetProperty( tree , "Items");
_ObjectCallMethod( items , "AddItem", "1.23");
_ObjectCallMethod( items , "AddItem", "2.34");
_ObjectCallMethod( items , "AddItem", "0");
_ObjectCallMethod( items , "AddItem", 5);
_ObjectCallMethod( items , "AddItem", "10000.99");
|
|
410
|
How can I display the currency only for not empty cells
OBJECT items,tree;
tree = ObjectByName("AN1") ;
_ObjectCallMethod( _ObjectGetProperty( tree , "Columns") , "Add", "Number");
_ObjectSetProperty( _ObjectCallMethod( _ObjectGetProperty( tree , "Columns") , "Add", "Currency") , "ComputedField", "len(%0) ? currency(dbl(%0)) : ''");
items = _ObjectGetProperty( tree , "Items");
_ObjectCallMethod( items , "AddItem", "1.23");
_ObjectCallMethod( items , "AddItem", "2.34");
_ObjectCallMethod( items , "AddItem", "0");
_ObjectCallMethod(tree, "TemplatePut", "Dim iteObj")
_ObjectCallMethod(tree, "TemplatePut", items)
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.ItemBackColor(AddItem()) = 8421631");
_ObjectCallMethod( items , "AddItem", "10000.99");
|
|
409
|
Is there a function to display the number of days between two date including the number of hours
OBJECT items,tree;
tree = ObjectByName("AN1") ;
_ObjectSetProperty( _ObjectCallMethod( _ObjectGetProperty( tree , "Columns") , "Add", "Start") , "Width", 32);
_ObjectCallMethod( _ObjectGetProperty( tree , "Columns") , "Add", "End");
_ObjectSetProperty( _ObjectCallMethod( _ObjectGetProperty( tree , "Columns") , "Add", "Duration") , "ComputedField", "2:=((1:=int(0:= date(%1)-date(%0))) = 0 ? '' : str(=:1) + ' day(s)') + ( 3:=round(24*(=:0-floor(=:0))) ? (len(=:2) ? ' and ' : " +
"'') + =:3 + ' hour(s)' : '' )");
items = _ObjectGetProperty( tree , "Items");
h = _ObjectCallMethod( items , "AddItem", "1/11/2001");
_ObjectCallMethod(tree, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(tree, "TemplatePut", items)
_ObjectCallMethod(tree, "TemplatePut", h)
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h,1) = #1/14/2001#");
h = _ObjectCallMethod( items , "AddItem", "2/22/2002 12:00:00 PM");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h,1) = #3/14/2002 1:00:00 PM#");
h = _ObjectCallMethod( items , "AddItem", "3/13/2003");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h,1) = #4/11/2003 11:00:00 AM#");
|
|
408
|
Is there a function to display the number of days between two date including the number of hours
OBJECT items,tree;
tree = ObjectByName("AN1") ;
_ObjectCallMethod( _ObjectGetProperty( tree , "Columns") , "Add", "Start");
_ObjectCallMethod( _ObjectGetProperty( tree , "Columns") , "Add", "End");
_ObjectSetProperty( _ObjectCallMethod( _ObjectGetProperty( tree , "Columns") , "Add", "Duration") , "ComputedField", "^"D ^" + int(date(%1)-date(%0)) + ^" H ^" + round(24*(date(%1)-date(%0) - floor(date(%1)-date(%0))))");
items = _ObjectGetProperty( tree , "Items");
h = _ObjectCallMethod( items , "AddItem", "1/11/2001");
_ObjectCallMethod(tree, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(tree, "TemplatePut", items)
_ObjectCallMethod(tree, "TemplatePut", h)
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h,1) = #1/14/2001 11:00:00 PM#");
h = _ObjectCallMethod( items , "AddItem", "2/22/2002 12:00:00 PM");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h,1) = #3/14/2002 1:00:00 PM#");
h = _ObjectCallMethod( items , "AddItem", "3/13/2003");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h,1) = #4/11/2003 11:00:00 AM#");
|
|
407
|
How can I display the number of days between two dates
OBJECT items,tree;
tree = ObjectByName("AN1") ;
_ObjectCallMethod( _ObjectGetProperty( tree , "Columns") , "Add", "Start");
_ObjectCallMethod( _ObjectGetProperty( tree , "Columns") , "Add", "End");
_ObjectSetProperty( _ObjectCallMethod( _ObjectGetProperty( tree , "Columns") , "Add", "Duration") , "ComputedField", "(date(%1)-date(%0)) + ' days'");
items = _ObjectGetProperty( tree , "Items");
h = _ObjectCallMethod( items , "AddItem", "1/11/2001");
_ObjectCallMethod(tree, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(tree, "TemplatePut", items)
_ObjectCallMethod(tree, "TemplatePut", h)
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h,1) = #1/14/2001#");
h = _ObjectCallMethod( items , "AddItem", "2/22/2002");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h,1) = #3/14/2002#");
h = _ObjectCallMethod( items , "AddItem", "3/13/2003");
_ObjectCallMethod(tree, "ExecuteTemplate", "iteObj.CellCaption(h,1) = #4/11/2003#");
|
|
406
|
How can I get second part of the date
OBJECT items,tree;
tree = ObjectByName("AN1") ;
_ObjectCallMethod( _ObjectGetProperty( tree , "Columns") , "Add", "Date");
_ObjectSetProperty( _ObjectCallMethod( _ObjectGetProperty( tree , "Columns") , "Add", "Second") , "ComputedField", "sec(date(%0))");
items = _ObjectGetProperty( tree , "Items");
_ObjectCallMethod( items , "AddItem", "1/11/2001 10:10:00 AM");
_ObjectCallMethod( items , "AddItem", "2/22/2002 11:01:22 AM");
_ObjectCallMethod( items , "AddItem", "3/13/2003 12:23:01 PM");
_ObjectCallMethod( items , "AddItem", "4/14/2004 1:11:59 PM");
|
|
405
|
How can I get minute part of the date
OBJECT items,tree;
tree = ObjectByName("AN1") ;
_ObjectCallMethod( _ObjectGetProperty( tree , "Columns") , "Add", "Date");
_ObjectSetProperty( _ObjectCallMethod( _ObjectGetProperty( tree , "Columns") , "Add", "Minute") , "ComputedField", "min(date(%0))");
items = _ObjectGetProperty( tree , "Items");
_ObjectCallMethod( items , "AddItem", "1/11/2001 10:10:00 AM");
_ObjectCallMethod( items , "AddItem", "2/22/2002 11:01:00 AM");
_ObjectCallMethod( items , "AddItem", "3/13/2003 12:23:00 PM");
_ObjectCallMethod( items , "AddItem", "4/14/2004 1:11:00 PM");
|
|
404
|
How can I check the hour part only so I know it was afternoon
OBJECT items,tree;
tree = ObjectByName("AN1") ;
_ObjectSetProperty( _ObjectCallMethod( _ObjectGetProperty( tree , "ConditionalFormats") , "Add", "hour(%0)>=12") , "Bold", -1);
_ObjectCallMethod( _ObjectGetProperty( tree , "Columns") , "Add", "Date");
_ObjectSetProperty( _ObjectCallMethod( _ObjectGetProperty( tree , "Columns") , "Add", "Hour") , "ComputedField", "hour(%0)");
items = _ObjectGetProperty( tree , "Items");
_ObjectCallMethod( items , "AddItem", "1/11/2001 10:00:00 AM");
_ObjectCallMethod( items , "AddItem", "2/22/2002 11:00:00 AM");
_ObjectCallMethod( items , "AddItem", "3/13/2003 12:00:00 PM");
_ObjectCallMethod( items , "AddItem", "4/14/2004 1:00:00 PM");
|
|
403
|
What about a function to get the day in the week, or days since Sunday
OBJECT items,tree;
tree = ObjectByName("AN1") ;
_ObjectCallMethod( _ObjectGetProperty( tree , "Columns") , "Add", "Date");
_ObjectSetProperty( _ObjectCallMethod( _ObjectGetProperty( tree , "Columns") , "Add", "WeekDay") , "ComputedField", "weekday(%0)");
items = _ObjectGetProperty( tree , "Items");
_ObjectCallMethod( items , "AddItem", "1/11/2001 10:00:00 AM");
_ObjectCallMethod( items , "AddItem", "2/22/2002 11:00:00 AM");
_ObjectCallMethod( items , "AddItem", "3/13/2003 12:00:00 PM");
_ObjectCallMethod( items , "AddItem", "4/14/2004 1:00:00 PM");
|
|
402
|
Is there any function to get the day of the year or number of days since January 1st
OBJECT items,tree;
tree = ObjectByName("AN1") ;
_ObjectCallMethod( _ObjectGetProperty( tree , "Columns") , "Add", "Date");
_ObjectSetProperty( _ObjectCallMethod( _ObjectGetProperty( tree , "Columns") , "Add", "Day since January 1st") , "ComputedField", "yearday(%0)");
items = _ObjectGetProperty( tree , "Items");
_ObjectCallMethod( items , "AddItem", "1/11/2001 10:00:00 AM");
_ObjectCallMethod( items , "AddItem", "2/22/2002 11:00:00 AM");
_ObjectCallMethod( items , "AddItem", "3/13/2003 12:00:00 PM");
_ObjectCallMethod( items , "AddItem", "4/14/2004 1:00:00 PM");
|
|
401
|
How can I display only the day of the date
OBJECT items,tree;
tree = ObjectByName("AN1") ;
_ObjectCallMethod( _ObjectGetProperty( tree , "Columns") , "Add", "Date");
_ObjectSetProperty( _ObjectCallMethod( _ObjectGetProperty( tree , "Columns") , "Add", "Day") , "ComputedField", "day(%0)");
items = _ObjectGetProperty( tree , "Items");
_ObjectCallMethod( items , "AddItem", "1/11/2001 10:00:00 AM");
_ObjectCallMethod( items , "AddItem", "2/22/2002 11:00:00 AM");
_ObjectCallMethod( items , "AddItem", "3/13/2003 12:00:00 PM");
_ObjectCallMethod( items , "AddItem", "4/14/2004 1:00:00 PM");
|